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PREFACE 


The internal logic of VSE/POWER is described in three separate volumes: 


VSE/POWER Program Logic Manual... 


Part 1, LY12-5027 (this manual) 
Part 2, LY12-5028 


Part 3, LY12-5034 


Part 1, this manual, contains: 


Section 1: Gives an overview of VSE/POWER, states requirements for opera- 
tion, and lists the devices supported by VSE/POWER. . 


Section 2: Refers you to Parts 2 and 3 for information on the "method of 
operation": 


— Part 2 describes the "method" for VSE/POWER. 
— Part 2 describes the "method" for the feature VSE/POWER Shared Spooling. 


Section 3: Outlines the logical structure of VSE/POWER; it explains the 
internal operations and shows the relationships between tasks and routines. 


Section 4: Lists program identifiers. This allows you to establish the 
relationship between phases, modules, and control sections. This part also 
lists the VSE/POWER messages and the relating modules. 


Section 5: Describes the layout of the VSE/POWER partition, account 
records, control blocks, and the work areas required by VSE/POWER. 


Section 6: Gives debugging hints, and shows how you can get information 
from a dump of the VSE/POWER partition. 


At the back of this manual, you find: 


Appendixes: They expand on the information given in the above sections. 
List of Abbreviations. 

Bibliography: Lists manuals you may want to consult. 

Glossary: Explains some of the terminology used in this manual. 

Index. 
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1. INTRODUCTION 


This section contains an overview of the Virtual Storage Extended/Priority Out- 
put Writers, Execution Processors and Input Readers (VSE/POWER) Program Product. 
It is organized as follows: 


° Purposes of VSE/POWER. A general description of VSE/POWER and the way its 
major functions are performed under VSE. 


° Communication with VSE/POWER. A summary of the VSE/POWER Operator Commands 
and the Job Entry Control Language, which allow the user to control 
VSE/POWER operations. The format of the messages issued by VSE/POWER is also 
explained. 


¢ Environmental Requirements. The programming requirements for the various 
functions of VSE/POWER, and the basic organization of the VSE/POWER parti- 
tion with its storage requirements. The machines and. devices which are sup- 
ported by VSE/POWER are listed under "Hardware Support”. 


PURPOSES OF VSE/POWER 


VSE/POWER performs automatic spooling and priority scheduling under the control 
of the VSE/Advanced Functions supervisor. VSE/POWER occupies a virtual partition 
in which it is initiated and can service from one to eleven partitions (other 
than the VSE/POWER partition) of a lower dispatching priority. Input to sup- 
ported partitions is first spooled onto intermediate disk storage. When the 
supported partition commences execution, I/O requests to reader devices are 
intercepted and satisfied from intermediate storage via I/O data areas in the 
VSE/POWER partition. Output requests to list and punch devices are also inter- 
cepted, with the output being stored in output data areas of the VSE/POWER par- 
tition and later transferred to disk or tape. Printing and punching of the 
output from disk or tape is carried out when requested by the operator. Under 
the control of VSE/POWER, programs may be executed in either real or virtual 
mode. 

The optional Shared Spooling feature permits the sharing of the VSE/POWER files 
that contain the spooled input and output among two or more VSE/Advanced Func- 
tions systems running in the same processor or different processors. 


The use of the optional networking function, referred to in other parts of this 
manual as PNET, allows VSE/POWER to fully participate within networks consisting 
of other VSE/POWER nodes, JES2 NJE nodes or RSCS nodes. 

Jobs, Output (list, punch), operator commands and messages can be transmitted 
from one computer system to another. 

The methods of communication used are binary synchronous communication (BSC) 
lines and synchronous data link control (SDLC) lines. 


Three major operations are performed under VSE/POWER control: 
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COMMAND TASK. Handles system operator commands and initiates other 
VSE/POWER tasks, or allows stopping of tasks. 


WAIT TASK. Transfers the VSE/POWER partition to and from the wait state to 
meet system requirements. 


RJE,BSC LINE MANAGER TASK. Controls line activities with remote termi- 
nals. The task is alive as long as VSE/POWER is active. 


RJE,SNA MANAGER TASK. Controls the activation of transmission processing 
to and from a remote SNA work station on a demand basis. The task is attached 
when the central operator issues a PSTART RJE,SNA command. The SNA manager also 
attaches a VSE/Advanced Functions subtask in which the interface with VTAM is 
opened. 


RJE,SNA LOGON TASK NO. 1. Initializes session work areas and does validi- 
ty checking of logon request. 


RJE,SNA LOGON TASK NO. 2. Establishes a session between VSE/POWER and a 
remote SNA work station. 


RJE,SNA LOGOFF TASK. Terminates a session between VSE/POWER and a remote 
SNA work station. 


RJE,SNA MESSAGE TASK. Sends messages to a remote SNA work station. 


SPOOL MANAGER TASK. Controls the activation and deactiviation of the 
internal reader task and the spool/command manager list task. The task is 
attached during VSE/POWER initialization when SPOOL=YES is specified in POWER 
macro and detached at VSE/POWER termination. 


READ TASKS.? Perform the first part of the read operation and transfer 
information from a peripheral reader to intermediate direct access storage. The 
operator may call for concurrent execution of as many read tasks as he has phys- 
ical readers available. Each read task is therefore associated with a specific 
reader. 


TAPE READ TASKS.? Performs the first part of a read operation and trans- 
fers information from a tape device to intermediate direct access storage. 

The operator can call for the concurrent execution of as many tape read tasks as 
he has physical tape units available. 


RJE,BSC READ TASKS.? Perform the read operation for a remote station. 
Each RJE,BSC read task has the standard name '1RDR' assigned to it. Different 
RJE,BSC read tasks are further distinguished by suffixing the line address to 
this standard name. 


RJE,SNA READ TASKS. Perform the read operation from a remote SNA work sta- 
tion. 


INTERNAL READER TASK. Performs the read operation for the PUTSPOOL 
VSE/POWER cross-partition communication macro interface. 
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STATUS TASK. Scans the Queue file or network definition table and prints 
the status report or node information respectively on SYSLOG, a line printer, a 
terminal printer, or sends the status report/ node information back to the orig- 
inating node. 


OFFLOADING TASK. Performs one of two functions: 
° Saves queue sets on tape, or 
¢ Restores saved queue sets from tape to VSE/POWER queues. 


The operator can call for the concurrent execution of as many offloading tasks - 
as he has physical tape units available. 


TIMER TASK. Supports the time-sharing approach used by the Shared Spooling 
feature. Interfaces with a VSE/Advanced Functions subtask that handles the tim- 
er intervals. 


NOTIFY TASK. Controls the transmission to VSE/ICCF of any message destined 

for a VSE/ICCF user. The task is attached during VSE/POWER initialization when 
NTFYMSG=nnn is specified in the POWER macro; the task is detached at VSE/POWER 

termination. 


PNET DRIVER TASK. Controls all activities on a PNET BSC or SDLC communi- 
cation line. Processing is performed on a demand basis. The task is attached 
when the first PSTART PNET,nodeid is entered and detached when the last node is 
disconnected (signed off). The Network Driver also attaches a VSE/Advanced 
Functions subtask in which the interface with ACF/VTAM is opened, when the first 
PSTART for a node is given using a SDLC communication line. 


TRANSMITTER TASK. Transmits job or output to another node in the network. 
Up to eight transmitters can be active at a time for any node currently con- 
nected. There can be a mixture of job and output transmitters active concur- 
rently. The task is active as long as there are jobs or output eligible for 
transmission. 


RECEIVER TASK. Receives either job or output from another node in the net- 


work. Up to eight receivers, which may be a mixture of job or output receivers, 
can be active at a time for any node which is currently connected. The receiver 
task is attached only for the duration of the transmission of one job or output. 


CONSOLE TRANSMITTER TASK. Sends messages and commands to another node in 


the network. The task exists as long there are messages or commands to send. 


CONSOLE RECEIVER TASK. Receives messages and commands from another node 
in the network. The task is associated with a specific node and is attached when 
the node is started and exists as long as the connection to that node exists. 


CONNECT TASK. Establishes a SNA session between VSE/POWER and another node 
in the network. The task is attached either when a PSTART nodeid is entered by 
the central operator, in which case the task acts as primary application, or 
when a BIND is received, in which case the task acts as secondary application. 
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Figure 1-1. Relationship Between VSE/POWER, VSE/Advanced Functions, and the 
Program Running Under the Control of VSE/POWER 
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Job Entry Control Language 


VSE/POWER provides a job entry control language (JECL) to assist the user in 
delimiting jobs to the system and to allow him to specify special requirements 
that may apply to particular jobs. JECL supplements but does not replace the 
job control language (JCL) provided by VSE/Advanced Functions itself. The JCL 
statements required for normal VSE/Advanced Functions system operation are also 
required when operating under VSE/POWER. 


For a detailed description of the VSE/POWER JECL statements, refer to VSE/POWER 
Installation and Operations Guide. 

Format of VSE/POWER Operator Messages 

Messages sent by VSE/POWER to SYSLOG, SYSLST, or to a terminal may have the fol- 


lowing formats: 


1QnnI or 1RnnI or 1VnnI (information-type message) 

1QnnD (decision-type message) 

1QnnA or 1RnnA or 1VnnA (action-type message) 
where: 


Q  VSE/POWER general-message indicator. 


R  VSE/POWER message indicator for messages issued by RJE,BSC, the 
command-processor tasks, the Shared Spooling feature, and networking. 


V  VSE/POWER message indicator for messages issued by RJE,SNA tasks. 
nn message-identification number. (May also include alpha characters). 


I-type messages are for the operator's information only; no response is 
required. Processing continues normally. 


D-type messages require an immediate reply from the operator. The console key- 
board is unlocked for the operator to reply, and the system waits for the opera- 
tor's reply, if the Asynchronous Operator Support of VSE/Advanced Functions is 
not generated. 


A-type messages require some action from the operator, such as mounting a tape. 
A-type messages for remote terminals are directly displayed on the remote print- 
er. The VSE/POWER task issuing the message is put in the wait state. 


Messages issued by VSE/POWER are listed in "Message-to-Module Cross-Reference 
List" on page 4-10 and are further described in the manual VSE/POWER Messages. 
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3. For 


The 


IPWSSBM 
IPWSSBR 
IPWSSBW 
IPWSSCI 
IPWSSLM 


following macros must a cataloged in a source library. 


PLINE 
PRMT 


VSE/POWER RJE/SNA (optional) 


¢ The following phases must be cataloged in a library. 
IPWSSCI IPWSS$LN IPW$$0C 
IPWSSIB IPWS$MD IPWSSSN 
IPWSSLF IPWSSMP IPWSSVE 
IPWSS$LH IPWSSOB 

° The following macros must be cataloged in a source library. 
PRMT 
PCPTAB 

4. For VSE/POWER Networking (optional) 

e The following phases must be cataloged in library. 
IPWSSBS IPWSSCX IPWSSNR 
IPWSSCAC IPWSSIN IPWSSNT 
IPWSSCI IPWSS$LD IPWSSSE 
IPWSSCLD IPWSSNC IPWSSSR 
IPWSSCN IPWSSNK IPWS$S1 
IPWSSCPF IPWSSNM IPWS$S2 
IPWSSCPS IPWSSNP IPWS$$S3 

° The following macros must be cataloged in a source library. 
PNODE 


PLINE (BSC only) 
5. For VSE/POWER Accounting (optional) 


e The following phases must be cataloged in a library. 
- IPWSS$GA 
IPWSSPA 
IPWSSSA 
e If the account file is on an FBA device, the following phases must be 
cataloged in a library. 
IPWSSGF 
IPWSSPF 
IPWSSSF 
e The following macros must be cataloged in a source library. 
PACCNT 
PUTACCT 
° The required job accounting specifications must be given at VSE/Advanced 
Functions IPL time. 
e An account file must be assigned to SYS000 on a spooling device. 
Account file space must be defined for IJAFILE on the label cylinder. 


6. For VSE/POWER Cross Partition Communication Support (optional) 
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The permanent area, consisting of five pages (10K), is permanently fixed in 
the real partition during initialization of VSE/POWER; if RJE,BSC support is 
used, the permanent area consists of six pages (12K). These pages are freed 
only when VSE/POWER is terminated (see Figure 1-3 ). 


The fixable area consists of pages that are fixed when a task is started and 
freed when they are no longer required for the completion of this task. 


The pageable area consists of pages that are allowed to be paged out whenev- 
er VSE/Advanced Functions requires additional real storage. 


The GETVIS area contains control blocks and work areas used by RJE SNA, 
PNET, VSE/Advanced Functions service routines, SYSIN tape support, printer 
setup processing (3800 or 3200), Notify message queue and I/O buffers for 
accounting if the account file is on an FBA device. 


RA ---> 


| 
Common Address Table | 
| 


Task Management routines 
Resource Management 

Real Storage management 
Message Service 


| 
| 
| 
| 
R9 ---> | 8 K 
Disk and Tape Service | 
Timer Service | 
Interval Timer Service | 
Data Address Validation | 
Set Remote Mask Routine | 
Virt. Storage Management | 

| 


Trace service 

Supervisor State Routines | 
Interval Timer Exit Rtn | 
RF ---> 


| 

RJE BSC Input/Ouput | 
Monitor (optional) | | 

| 


Figure 1-3. VSE/POWER Permanent Area 


Real Storage 


The minimum real-address space must be equal to the size of the permanent area 
(10K) plus the fixable area. The size of the fixable area (minimum = 4K) 
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Teleprocessing control units supported by RJE,BSC are: 


IBM 2701 Data Adapter Unit with SDA (Type 2) 

IBM 2703 Transmission Control Unit 

IBM 3704 Communications Adapter in 2703 emulation mode 
IBM 3705 Communications Adapter in 2703 emulation mode 
Integrated Communications Adapter in the various models 


Restrictions: 


¢ TP connections must be point-to-point on switched or non-switched 
lines. 


° Multipoint connections are not supported. 


‘ 


e Terminals and control units having the multipoint line control or 
multipoint data link control features are prohibited. (Connecting 
such a terminal or control unit to the POWER/RJE,BSC system will 
cause continuous error recovery processing. ) 


4. The Universal Character Set Buffer (UCB) and Forms Control Buffer (FCB) fea- 
tures are supported by VSE/POWER. The execution processor will accept UCB 
and FCB load requests from the various supported partitions for appropriate 
action at list time. On encountering an FCB load command, the execution 
processor will update the internal buffer representation to reflect the new 
buffer. 

5. VSE/POWER will support the 2560 and 5425 devices as SYSRDR, SYSIPT, and 
SYSPCH, and will handle 96-column input and output records for the 5425. 
The following functions are included: 

° Program-controlled stacker selection 

° Punch and interpret 

° Card print 

e Punch and print 
However, there are some restrictions: 

° VSE/POWER cannot update or interpret a card input file. 

¢ Read column binary is not supported. 

e No program-controlled stacker selection on input. 

° If a 2560 Punch or 5425 Punch is used, then hopper 1 must be used for 
input. Hopper 2 must be used for output. When no separate cards are 


used hopper 1 may also be used for output. 


6. The following I/O devices are supported by RJE,SNA: 
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2. 


METHOD OF OPERATION 


For the description of the method of operation, refer to: 


VSE/POWER Program Logic Manual, Part 2, LY12-5028. 
Part 2 describes the method of operation of VSE/POWER. 


VSE/POWER Program Logic Manual, Part 3, LY12-5034. 


Part 3 describes the method of operation of the Remote Job Entry (RJE) and 
networking functions of VSE/POWER. 
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3. PROGRAM ORGANIZATION 


This section describes the program organization of VSE/POWER. It outlines the 
logical structure of the VSE/POWER Program Product, presenting overviews of all 
internal operations and indicating the relationships between the various tasks 
and routines. 


The following topics are discussed: 


Code organization explains the VSE/POWER code and storage structure and lists 
the internal macros. 


Initialization and termination gives an overview of the phases that handle 
start-up and shut-down of VSE/POWER processing. © 


VSE/POWER multitasking explains the principles of task selection, of starting a 
task, and of terminating a task. 


Reader, execution processor, and writer tasks shows the data flow through the 
spooling process, and highlights the work done by the various phases related to 


these tasks. 


The Spooling Process describes spooling to and from the queue file and the data 
file. 


Services describes the routines of the nucleus phase. 


Miscellaneous tasks and functions describes various tasks and functions that are 
not readily associated with the above areas. 


Command processor gives an overview of command processing; how the command 
processor is invoked, and what actions are taken. 


VSE/POWER job accounting describes the account functions and the save account 
task. 


Remote job entry highlights the essentials of RJE,BSC and RJE,SNA. 


Appendages lists the routines in the nucleus phase that are extensions of the 
VSE/Advanced Functions system control programs. 


VSE/POWER Shared Spooling gives an overview of how the Shared Spooling feature 
works. . 


VSE/POWER Networking gives an overview of how the Networking function works. 
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¢ The second group of page frames are withdrawn from the VSE/Advanced Func- 
tions page pool and contain, firstly, the pages of the VSE/POWER permanent 
area and, secondly, those pages of the VSE/POWER fixable area which have 
been fixed in real storage by the VSE/POWER real storage management service. 


Note: 


1. The pages of the VSE/POWER fixable area which have not been fixed in real 
storage by VSE/POWER do not occupy real storage in any sense. 


2. For RJE,SNA operations, for 3800 Printer setup processing, for SYSIN tape 
support, for networking transmission buffers, for message queues, for PNET, 
for VSE/Advanced Functions service routines or for accounting (account file 
on FBA device), the GETVIS area in the VSE/POWER partition is used to allo- 
cate work areas and control blocks. 

Refer to Figure 3-72 for a description of the RJE,SNA control blocks and 
work areas and to 5, "Data Areas" on page 5-1. The SNA work areas within 
their pools are allocated by the SNA processors and freed when no longer 
needed. GETVIS storage pools for SNA control blocks and work areas for 
SYSIN tape and account support (if required) are acquired when required by 
VSE/POWER and freed when no longer needed. Transmission buffers (SNA only), 
control blocks and workareas for networking support are acquired only when 
the transmitters and/or receivers are active and are given back to the 
GETVIS pool when these tasks terminate. For 3800 Printer setup processing, 
the work area is allocated by the SETPRT logic module and freed when no 
longer needed. 

Some of the control blocks, such as the network definition table (NDT), are 
allocated at VSE/POWER initialization time and exist as long as VSE/POWER is 
active. 


Code Structure 


The code of VSE/POWER consists of External Routines, Internal Routines, Func- 
tions, Services, and Appendages, (see Figure 3-1). 
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External Routines 


External routines provide task support at the highest level of the system. Each 
external routine consists of a single phase which is physically located in the 
VSE/POWER pageable area. 


The following external routines are provided: 


IPWSSBR 
IPWSSBW 
IPWSSCA 
IPWSSCAC 
IPWSSCB 
IPWSSCC 
IPWSSCD 
IPWSSCE 
IPWSSCF 
IPWSSCG 
IPWSSCH 
IPWSSCI 
IPWSSCJ 
IPWSSCL 
IPWSSCLD 
IPWSSCM 
IPWSSCN 
IPWS$CO 
IPWSSCP 
IPWSSCPF 
IPWSSCPS 
IPWSSCR 
IPWSSCRE 
IPWSSCS 
IPWSSCT 
IPWSSCU 
IPWSSCX 
IPWSSER 


RJE,BSC Reader 

RJE,BSC Writer 

PALTER Command Processor 
PACT Command Processor 
PBRDCST Command Processor 
PCANCEL Command Processor 
PDISPLAY Command Processor 
PEND Command Processor 
PFLUSH Command Processor 

PGO Command Processor 

PHOLD Command Processor 
PINQUIRE Command Processor 
PACCOUNT Command Processor 
PDELETE Command Processor 
PLOAD Command Processor 
Command Processor Root Phase 
PDRAIN Command Processor 
POFFLOAD Command Processor 
PSTOP Command Processor 
PFLUSH PNET Command Processor 
PSTART PNET Command Processor 
PRELEASE Command Processor 
PRESET Command Processor 
PSTART Command Processor 
PRESTART Command Processor 
PSETUP Command Processor 
PXMIT Command Processor 

3540 Diskette Reader 


IPWSSIB 
IPWSSLD 
IPWSSLF 
IPWSSLH 
IPWSSLM 
IPWSSLN 
IPWSSMP 
IPWSSNS 
IPWSSOB 
IPWSSOC 
IPWSSOF 
IPWSSPL 
IPWSSPP 
IPWSSPR 
IPWSSPS 
IPWSSNR 
IPWSSNT 


RJE , SNA 
Network 
RJE ,SNA 
RJE ,SNA 
RJE , BSC 
RJE , SNA 
RJE , SNA 


Inbound Processor 
PNET Driver 

Logoff Processor 

Lgon Processor No. 1 
Line Manager 

Logon Processor No. 2 
Message Processor 


Notify Support 


RJE ,SNA 


Outbound Processor 


Outbound Compaction Manager 


Offload 


Queues Routine 


Physical List 

Physical Punch 

Physical Reader 

Print Queue Status/ Node information 


Network 
Network 


Receiver 
Transmitter 
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IPWSSMS Message Handler 

IPWSSMX Message Distributor / Modification 

IPWSSNC Network Composer 

IPWSSNK Network Compression/ Decompression 

IPWSSNM Network I/O Manager 

IPWSSNP Network Presentation Services 

IPWSSNQ(S) Get Next Queue Set from Chain 

IPWSSOE 3540 Diskette Open 

IPWSSOT Open/Close tape 

IPWSSPA Put Account Record 

IPWSSPF Put Account Record for Account File on FBA Device 

IPWS$PD Put Data Record 

IPWSSRQ(S) Reserve Queue Record 

IPWSSRY(S) Queue-file Recovery 

IPWSSSC Scan Reader JECL Statement 

IPWSSSL Get Source-Statement-Library Record 

IPWSSSR PNET,SNA Send/Receive Manager 

IPWSSTR Terminate VSE/POWER Task 

IPWSSXJ Scan Execution JECL Statement 
Services 


Services provide support for operations common to many routines and functions; 
they are to be regarded as low-level subroutines capable of concurrent 
execution, and are invoked by means of the Service Macro Instructions described 


below. 


Each service is coded as a separate segment; all of these segments are 


however physically located within the nucleus phase (IPWSSNU) which forms the 


VSE/POWER permanent area. 


The following services are provided: 


e Disk and Tape Service 
: Message Service 
Local Message Service 
Remote Message Service 
Notify Service 
Nodal Message Service 
Remote Service 
Resource Management 
Storage Management 
Task Management 
Timer Service 
Interval Timer Service 
Validation Service 
Get Trace Entry Routine 
Virtual Storage Management 


Appendages 


Appendages provide code which, though physically present in the nucleus phase 
(IPWSSNU), is logically part of the VSE/Advanced Functions supervisor or of some 
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aaa Ca RR aaa a | 


|Macro 


| 
| 
| IPWSAQS 
| IPWSDQS 
| IPWSFQS 
| IPwSGQS 
| IPWSRQS 


! 
| IPWSGDR 
| IPWSPDR 
| 
| 
| 
| 
| 


| IPWSOAF 
| IPWSGAR 
| IPWSPAR 


|Other functions 


| IPWSBUF 
| IPWSCNC 
| IPWSGMS 
| IPWSGSL 
| IPWSIAS 
| IPWSICP 
| IPWSIOC 
| LPWSIOM 


| IPWSOEF 
| IPWSOTP 
| IPWSSRJ 
| IPWSSXJ 
| IPWSULP 


Figure 


ueue management 


Data management 


Account management 


| Purpose 


|Add queue set to chain 
|Delete queue set from chain 
|Free queue set 


|Get next queue set from chain 
‘|Reserve queue record 


| 

| 

| 

|Get data record 
|Put data record 
| 

| 

| 


|Close account file (delete contents of account 


|file if on FBA device) 


|Open account file (not required for FBA ) 
|Get account record (not required for FBA) 


|Put account record 


| t 


|Invoke PNET Buffer management 


|Cancel VSE/POWER 


|Invoke general message service 
|Get source statement library record 


|Invoke asynchronous service 
|Invoke command processor 


|Invoke outbound compaction manager (IPW$$0C) 
|Invoke RJE,BSC I/O Monitor, PNET I/O Manager 
|PNET SNA SEND/RECEIVE Manager 


|Open diskette file 
|Open/close tape 
|Scan reader JECL statement 


|Scan execution JECL statement 


|Update LUB and PUB tables 


3-3. Function Macros 


3% 
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Dn eG ety tg yp ae ge a re ee RE eT ae Gil 
|Macro | Purpose . | 


[Tape service (TS) | 
| | 


Trace service 


: 
| [PWSWIT |Write tape record | 
| IPWSRDT |Read tape record | 
| IPWSCTT |Execute tape control | 

| | 
|Timer service (TIS | | 
| | | 
| IPWSRDC |Read (TOD) clock | 
| IPWSSTM |Set timer interval | 
| | | 
|Validation service (VS) | | 
| | | 
| IPWSVDA |Validate data area addresses | 
| | | 
|Remote Service (RS | | 
| | | 
| IPWSSRM |Set remote mask in bit table | 
| | | 
| | | 
| | | 
| | | 


IPWSGTE Get trace entry 


Figure 3-4 (Part 2 of 2). Service Macros 
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|Macro 


| IPWSDTB 
| IPWSDTC 
| IPWSDTE 
| IPWSDVC 
| IPWSDVD 
| IPWSDVS 
| IPWSDWA 
| IPWSDWC 
| IPWSDWG 
| IPWSDWN 
| IPWSDWP 
| IPWSIOR 


| Purpose 


|Define 
|Define 
|Define 
|Define 
| Define 
|Define 
|Define 
|Define 
| Define 
|Define 
| Define 
|Define 


tape control block (TBB) 

task control block (TCB) 

task control block extension area 
PNET VTAM control block 

various Dsect's 

virtual storage control block 

SNA work area (WACB) 

PNET Composer workarea 

PNET Receiver/Transmitter workarea 
Receiver/Transmitter Account area 
PNET Presentation service workarea 
input/output request (RJE,BSC) 


Figure 3-5 (Part 2 of 2). Definition Macros 


ee ag a ge ee ge ee 
| Purpose | 


|Macro 
|Entry/Exit 


| IPWSALN 
| IPWSVCA 
| IPWSEQU 
| IPWSGMD 
| IPWSGMM 
| IPWSRET 
| IPWSSAV 


| 
| 


|Align to storage boundary 

|Validate command authority 

|Establish equates 

|Generate message definition 

|Generate message module 

|Restore registers and return to caller 
|Save caller registers 


Figure 3-6. Miscellaneous Macros 


INITIALIZATION AND TERMINATION 


Initialization of VSE/POWER 


The initialization of VSE/POWER comprises of the following phases: 


IPWSSIP 

IPW$$I1(S) 
IPWS$$12(S) 
IPW$$13(S) 
IPWS$I4(S) 
IPWS$$I5(S) 
IPWS$$17(S) 


User-generated phase (POWER/username) 


(optional for Accounting support ) 
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EXEC POWER 















VSE/POWER LOADER 
Generation Table 


Permanent 
Area 







Fixable Area 


2K Work Area 
for IPW$$CM 


BSC part of generation table. 


SNA part of generation table. 





VSE/POWER Loader loads IPWSSIP (start of pageable area + 2K). 
IPWSSIP saves the local part of the generation table internally. 
IPWSSIP loads the initialization phases into the overlay area and 
gives control to them. 

IPWSS$I1 saves the BSC portion of the generation table behind 
IPWSSIP. 

IPWS$I1 builds the SNA control block (if required) in the GETVIS 
area and saves the SNA portion of the generation table. 

IPW$$I1 loads IPWS$$NU and IPWS$$BM (if BSC is supported) and fixes 
them. 

The other VSE/POWER phases are loaded into the pageable area. 

The last phase loaded by IPWSSIP is IPWSST1; this is the termination 
phase of VSE/POWER. 


Figure 3-7. Initiation Logic 


IPWS$$I1: 


Checks if VSE/POWER is already active 

Checks if SYSLOG is assigned to a console device 

Checks if VSE/POWER runs as main task 

Checks if VSE/POWER runs in a virtual partition 

Checks if the VSE/Advanced Functions Supervisor supports JAI, if VSE/POWER 
accounting is requested 

Checks if the Shared Spooling feature is supported, when generated in the 
POWER generation, and if not then issues message 1QO0AI and terminates 
VSE/POWER initialization 

Checks if RJE,SNA is supported 

Validates the remote terminal ids for RJE,SNA 

Builds the remote control block (SNA) 
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Checks if the same number of data-file extents are specified as at coldstart 
time 

Checks when queue file and data file are shared that further data file 
extents which do not reside on the same volume as the lst extent are on 
shared device(s) 

Builds sector table in MCB of first extent 

Formats the data file (if coldstart) 

Validates the size of the track group or block group 

Formats queue file (if cold start) 


IPW$$I5: 


Obtains device information of device containing account file 

Opens account file 

Builds and formats ACB 

Acquires input/output area (4K), if Account file resides on FBA device 

If cold start, erases account file 

If warm start, locates last written account record or CI if FBA device by 
invoking Account file recovery. 


IPW$$17: 


Attaches librarian subtask, if applicable 
Prints status report, if applicable 

Does final housekeeping 

Sets up timer task, if queue file and data file are shared 
Sets up Notify task, if applicable 

Sets up line manager task (if RJE,BSC) 

Sets up SNA control block (if RJE,SNA) 

Builds and formats remote message control block 
Writes VSE/POWER ‘start-up' account record 
Performs autostart 

Activates page-fault appendage 

Deactivates initiator task 


Initial task selection by VSE/POWER is illustrated in Figure 3-8 . 
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Warm and Abnormal Warm Start 


The decision to perform a ‘Warm Start' or an ‘Abnormal Warm Start' depends on 
the contents of a field (the USE count), contained in the master record. When 
initialization is complete the USE count is incremented by one, and when a 
VSE/POWER system terminates normally the USE count is decremented by one. 


If at initialization time the USE count is zero, meaning that there are no 
VSE/POWER systems active and that the last VSE/POWER termination was normal, a 
'Warm' start is performed. All information required to control the spool files 
are extracted from the master record, without re-constructing the class chains 
on disk. 


If however the USE count is non zero in a non-shared environment the Queue file 
recovery program (IPWSSRY) is invoked to re-construct the class chains and to 
reset all queue sets which are still marked ‘in execution’. 


If the USE count is non zero in a shared environment then another field, 
referred to as the SYSID-bucket, is used to check if the last termination of 
this VSE/POWER system was normal or abnormal. If the bucket contains an entry 
with the same SYSID as the initializing system, then the last termination was 
abnormal. In this case ‘abnormal' warm start is performed. If however the last 
termination of this VSE/POWER system was normal, ‘warm' start is initiated. 


Note: Normal termination always resets the SYSID-bucket for that system to 
zero if it is in a shared environment. 


An additional field, contained in the master record, is the 'SYSID' field, that 
contains the SYSID of the system that is currently accessing the the Queue file 
in update mode. This field is important after VSE/POWER initialization, because 
whenever a VSE/POWER system locks the Queue file, it first checks the SYSID 
field. If a SYSID is present then Queue file recovery is performed for the SYSID 
found in the field, without the operator having to re-initialize VSE/POWER in 
the abnormally terminated system. 





Termination of VSE/POWER 


VSE/POWER is normally terminated by the PEND command. All active tasks are 
allowed to continue until they finish processing the current queue entry. Deac- 
tivation is handled by each of the tasks, after the command processor (IPWSSCM) 
has set a termination code ("S", "E", "F", or "H") in their TCBs. In case of an 
I/O error, VSE/POWER tasks can also be terminated by the IPWSS$STR phase (see "Ab- 
normal Termination of VSE/POWER Tasks"). 


After all supported partitions have been released, the VSE/POWER partition is 
restored for normal VSE/Advanced Functions operation. 


The detach routine of task management actually gives control to the terminator 
routine IPWSST1. 


The terminator routine performs the following functions: 


It writes the final VSE/POWER execution account record. 
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When one of the VSE/POWER tasks itself detects an abnormal-termination 
condition, it issues the IPWSCNC (CANCEL) macro instruction, which stores the 
registers (but not the PSW) in the abnormal-termination save area and branches 
immediately to the abnormal-termination routine with cancel code X'FF'. 


The operator is prompted to specify the printer device on which he wants the 
dump to be printed. If he specifies an invalid device (such as no valid printer 
device or device is down), the operator is prompted again. Otherwise SYSLST is 
assigned to the device just specified. 


Additionally the option DUMP is set in the COMREG to obtain a dump at abnormal 
termination of the VSE/POWER partition. 


All VSE/POWER indicators in all partitions running under VSE/POWER are turned 
off and all dummy assignments are released. Also, all programmer-logical-unit 
assignments in the VSE/POWER partition are released, except for DASD 
assignments. 


VSE/POWER Multitasking 


In order to execute VSE/POWER tasks concurrently, but asynchronously, VSE/POWER 
incorporates multitasking support. Because this support does not depend on the 
multitasking (asynchronous processing) support provided in VSE, it is called 
private multitasking. 


Each VSE/POWER task is equipped with a task control block (TCB) created in fixed 
storage. The TCB is used to establish the identity of the task and to preserve 
its status when it is not in active control of the central processor. 


The task control blocks present at any time in VSE/POWER are linked together by 
means of next task and previous task pointers to form a logical list called the 
task selection list. The task selection list is considered to begin and end 
with the Wait Control Block (WCB), a skeleton TCB whose function is to delimit 
the task selection list. 


The logical position of each task control block within the task selection list 
(see Figure 3-9) determines its dispatching priority relative to the other tasks 
within the list. This priority takes effect only when task selection is 
entered; once a task is running it will continue to run until it yields control 
by means of one of the task selection service macro instructions (IPWSWFx) or 
sustains a page fault. Thus, a higher priority task will not interrupt a run- 
ning task. 


An initial task selection list is constructed by the VSE/POWER initiator 
(IPWS$I2). This list contains the wait control block, the task control block of 
the permanent command processor task, and the task control block of the initi- 
ator task. All further additions to and deletions from the task selection list 
are performed by the task management service. 
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¢ Task termination - detach current task. 


Each of these components is discussed in the following paragraphs. 


Task Initiation 


Task initiation is entered from a VSE/POWER task by means of the IPWSATT (attach 
new task) macro instruction. The issuing task has already acquired storage for 
and formatted the task control block which will represent the new task; in par- 
ticular it has created the task storage descriptor which establishes the task 
type and identity. 


Task initiation determines the point within the current task selection list at 
which the new task control block must be inserted, and adjusts the ‘previous 
task' and ‘next task' pointers within the task control blocks concerned. The 
new task is then set into D(dispatchable) state, and return is made to the call- 
ing task. This is illustrated in Figure 3-10 . 


previous 


— — — — new pointers 


old pointers 





next 


Figure 3-10. Attaching a Task 
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IPW$SWFD set D state and wait for re-dispatch. 


(The significance of these individual states will emerge in the discussion of 
the routines that issue the individual macro instructions.) > 


The status of the task yielding control is saved by storing the current contents 
of the general purpose registers (and the condition code) in the task register 
save area of the task control block. This done, the task selection process can 
begin. 


The task selection list is used to address and examine each task control block 
in turn in order of dispatching priority to determine whether the associated 
task can be dispatched. This is done by means of the task state value set in 
the task control block. In addition to the task states listed above, one addi- 
tional state must be mentioned: P state (page-bound), which is set by the page 
fault appendage (see "VSE/POWER Appendages") when a task sustains a page fault. 


Tasks in the following states are nondispatchable: 


| state - the task is waiting for reactivation. 
P state - the task is waiting for a page-in operation. 
O state - the task is waiting for operator response. 


Tasks in the following states are conditionally dispatchable. A further test or 
tests must be performed to determine whether the condition has been satisfied 
and the task is in fact ready for dispatch. 


state - the task is waiting for a locked resource. 

state - the task is waiting for ECB or CCB posting. 

state - the task is waiting for ECB or CCB posting. 

state - the task is waiting for class table posting or multiple XECB posting. 
state - the task is waiting for any of a set of ECB or CCB postings. 

state - the task is waiting for a RJE,BSC or PNET event. 


ODT OnOr 


Tasks in the following state are unconditionally dispatchable: 


D state - the task is ready for immediate dispatch. 


As soon as a dispatchable task is found within the task selection list, the gen- 
eral purpose registers (and condition code) are restored from the task register 
save area of the task control block, the task is set into R state (running), and. 
execution of the task is resumed from the point at which it previously ceased. 


If the entire task selection list is scanned without any task being found to be 
dispatchable, the task selection service issues an SVC 7 to pass control to the 
VSE/Advanced Functions supervisor. Additionally the no-work-to-do ECB is 
posted when no task is waiting for a locked DMB or, if the Account file is 
shared, for a locked ACB. VSE/POWER will wait till the occurrence of some 
related event (1/0 completion, for example) causes VSE to return control to the 
task selection service. The entire task selection process is then repeated. 
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READER, EXECUTION PROCESSOR, AND WRITER TASKS 


The data flow throughout the reader, execution processor, and writer task is 
summarized by Figure 3-13 . 
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Reader Tasks 


The reader task is executed by a physical reader routine (PR) and logical reader 
routine (LR). These routines pass control to each other through a logical 
record interface. At unit exception, the task places itself in a dormant state, 
releasing as much work space as possible. "Hot reader" support enables a dor- 
mant task to continue without a PSTART command, if new input has become avail- 
able (refer to "Device End Appendage"). 


Physical Reader (PR) 


The PR is entered when a reader task is invoked by a PSTART command, or when an 
unsolicited device-end interrupt occurs while the task is in a dormant state 
(hot reader support). Special work areas will be allocated at entry time and 
initialized according to the supported physical device (see Figure 3-14). The 
work areas can be released by the termination routine IPWSSTR. 


The PR performs the physical input for one or more devices and establishes the 
linkage with the LR so that, on request, each logical record can be passed over 
the interface to the LR. Each input operation will handle a number of records 
by means of command chained CCWs (refer to "Physical Data Record area" in Sec- 
tion 5). The input operation is performed with real addresses in the CCWs (/370 
mode only). 
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Unblocked Tape Format: 


[ccs 


ccw! } L_ cow" | RECORD! | | RECORD” | 


Blocked Tape Format: 





Figure 3-15. Physical Data Area - GETVIS Space 


Physical 3540 Diskette Reader (ER) 


This routine is entered via the logical reader when a RDR statement is encount- 
ered in the input stream, or via task selection as a result of a PSTART command 
issued for the diskette reader only. It reads data from the physical diskette 
reader associated with the reader task. 

If the routine is entered from the logical reader and no diskette unit is 
assigned (dynamic RDR support), the PUB table is scanned for a free, operational 
3540 device. If no such unit is available, the job is flushed and the operator 
is informed via message 1Q90I. Otherwise the diskette unit remains assigned to 
the job until end of job is encountered. 


Logical Reader (LR) 


The first time the routine is entered, it reserves work space for the queue 
record area and acquires a queue record from the free queue set (via IPWSRQS 
macro instruction). 


The values may be overwritten by specifications in the JECL statements (* $$ JOB 
and * $$ CTL). A job header record is set up and passed to the put data record 
routine. Records passed via the logical record interface will be passed in turn 
to the put data function routine (PD) for writing to the data file. The general 
purpose byte in the record request word (RRW) of the TCB indicates what action 
is to be taken by the PD routine. 


General-purpose byte posted by LR: 
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additionally responsible for recognizing the first request addressed by each job 
executed within the partition to each of the partition list and punch devices 
designated at partition PSTART time, and initiating an execution writer task to 
service the further program requests addressed to that device. 


Until end of job the execution tasks proceed concurrently but asynchronously. 
When the execution reader detects an end-of-job condition it posts a stop condi- 
tion to each of the subordinate tasks that it started. It then waits until each 
of these tasks detaches itself in turn. 


If no other queue entry can be processed the reader task will place itself in a 
wait state, after a message is issued. When a PSTOP command is issued the read- 
er task and its subordinate tasks will eventually be detached after processing 
the current queue entry. 


Execution Reader Routines (IPWSS$XR and IPWS$XJ) 


This routine will emulate the user channel program input requests for the reader 
device. To service these requests a data record is kept available throughout 
the process of this routine. Records are retrieved via IPWSGQS and IPWSGDR mac- 
ro instructions. The routine does the following: 


° Holds a copy of the job header record in core anchored to the partition con- 
trol block of the partition concerned. 


. Intercepts first request for output of the user channel program. Acquires 
storage for the queue record area and data set header record, initializes 
them with the VSE/POWER defaults and the information obtained from the job 
header record. Both areas are then anchored to the TCB of the new execution 
writer task and the task is then attached. 


° Handles all input requests from the user channel program. 


° In case of a writer-only partition, analyzes JECL statements from a console 
read/write operation and starts a writer task. 


° Indicates termination of a writer task once a queue entry has been processed 
or a data break condition is recognized. 


e When an SLI JECL statement is encountered, initiates for the insertion of 
source statement library records. 


¢ When PUN, LST, or PRT JECL statements are recognized, terminates the appro- 
priate writer task, builds a new queue record and data set header record, 
and starts the writer task again. 


° Completes the job trailer record with accounting information at end of job 
time. 
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with the data area address pointing to the SETPRT parameter list. 


The execution 


processor recognizes the 'FD' operation code as a valid command for ene 3800. 
SETPRT handling is illustrated in Figure 3-16 


Application partition | 





SVA or GETVIS area 
of partition 


VSE/POWER partition 


SETPRT logic | 

| module 
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program 
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output 
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Figure 3-16. SETPRT Handling 


The execution processor maintains a control block, called data set header 
record, which contains the current printer setup of the device being spooled. 
When a SETPRT parameter list is encountered by the execution processor, the 
printer setup is updated, which means the new setup request is merged with the 
previous one. 


When the BURST, FORMS, FLASH, or copy group specifications have been changed, 
the output is segmented (that is, the output entry is closed and added to the 
class chain according to the priority; then a new output entry is created with 
the same jobname and job attributes but with a different job number, in order to 
facilitate queue manipulation by the operator). The Job header record and data 
set header record are then written as first records in the new list queue entry. 


Whenever the execution processor detects that a valid CINDX value (other than 0 
or 1) was specified in the SETPRT parameter list, it assumes that the user will 
manage the copy group handling by himself. . 


The execution processor creates a new output LIST entry with the same job attri- 
butes and sets the transmission count to one. 


When a SETPRT parameter list contains an FCB specification, the FCB image is 
loaded from the library and the internal representation of the page format is 
updated. The data set header record is updated accordingly. The FCB image is 
validated for accuracy. If a 3800 FCB image is invalid, a message (1Q54I) is 
written to the operator and the hardware default FCB is used. The LTAB specifi- 
cation is assumed as the internal representation of the FCB. 
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SETPRT processing is illustrated in Figure 3-17. If a SETPRT parameter list was 
passed by the logical writer, the partly filled print buffer is emptied and a 
IPWSIAS TYPE=SERVICE macro instruction is issued to perform the printer setup. 
Additionally if the DEBUG option was specified in the SETPRT parameter list, 
SYSLST is temporarily assigned for the duration of the setup. Each output oper- 
ation will print or punch a number of records by means of command-chained CCWs 
(see "Physical Work Space"). The output operation is performed with real 
addresses in the CCWs (EXCP real, System/370 mode only). 
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Figure 3-17. SETPRT Request Processing Flow 


Logical Writer 


A new queue set is addressed by invoking the get next queue set (NQ) function. 
If no queue set is eligible, a physical writer task is placed in a wait state 
until a new eligible queue set is added or an existing queue set becomes avail- 
able. In all other cases the logical writer routine returns to its caller with 
an indication that there is nothing to do. 


The routine ensures that the controlled printer/punch or even remote station is 
set up with the requested forms. The forms id obtained from the queue record is 
compared with the one in the TCB of the writer task that specifies the actual 
setup. If a mismatch requires operator intervention (for 3800, a mismatch of 
forms, flash or burst status), message 1Q40A or 1QA6A is issued. The operator 
must then either perform the setup and use the PGO command to continue process- 
ing, or else stop the writer task or flush the output via the PSTOP/PFLUSH com- 
mand respectively. 


A warning message (1Q411I) is issued if a different printer/punch device is used 
at physical print/punch time as was used at execution time. The operator can 
then decide whether to continue with the output or to flush the output. If he 
decides to continue, all illegal commands passed to the physical device are 
ignored and the output may contain invalid data or may lose records. 


Start separator pages/cards are produced, if applicable at the beginning of each 
outout and between copies. 


A logical record is retrieved from the data file by invoking the get data record 
(GD) function. 
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LOAD Function 


This function will be used to restore queue sets, residing on tape, to the 
VSE/POWER queues. Only those sets can be restored which match with the specified 
queue identifier of the POFFLOAD command. If the LOAD ALL function is requested 
then all queue entries will be restored from the tape. The restore function 
operates independently of block size, which means that different DBLK sizes may 
be used between save and load time. The queue entries will be restored accord- 
ing to their class and disposition, unless the operator specifies a class. 


The POFFLOAD tape format which is identical to the spool tape format is shown in 
Figure 3-18 . 


T HEADER TRAILER T HEADER TRAILER T T 
QUEUE QUEUE QUEUE QUEUE 
R R 


m| record | | osLk 1S peck | [Recoro Jm|_recorv J [__paLk } Loetk St pack | [Recorp Ju mo 


Figure 3-18. Internal Tape Format 
THE SPOOLING PROCESS 


Queue File Organization 
Four types of records are physically present on the queue file: 


A master record queue identifier M (physically the last record in the 
file). Contains the class table, node attached table, 
shared spooling information and other control fields which 
must be retained between the termination and initialization 
of VSE/POWER. 


Queue records queue identifier F, R, L, or P 
A dummy record queue identifier D. Indicates the logical end of the queue 
records. 


An internal record queue identifier I (physically the first record in the 
file). Contains the seek address of the master record in 
its first eight bytes. 


Logically, by means of pointers, the queue records are either a member of the 
free queue set or a member of a queue set that is in turn a member of a class 
chain. The free queue set is shown in Figure 3-19 


Records in the free queue set (queue identifier F) are chained by the 


next-in-set pointer. The dummy record delimits the free chain. The start of 
this chain is kept in the master record. 
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Data File Organization 


The space available on the data file is arranged in track groups (C-K-D) or 
block groups (FBA). Each track or block group contains an integral number of 
tracks or blocks, respectively. Each track group or block group has a fixed 
relationship with a queue record in the queue file. Hence, a queue record in 
the free queve chain will point to an available track group or block group. A 
queue record in a class chain will point to a track group or block group that is 
in use. 


Each physical record (fixed length) in the data file contains one or more log- 
ical records. Each logical record represents a unique record of the user pro- 
gram that is being spooled. Figure 3-21 shows the layout of a physical record: 






binary zero 
if remainder 





logical record 





RL length of the logical record 


GP general purpose byte (see also sections "Logical Reader (LR)" and"Logical 
Data Record Area (LDA)") 


CC command code associated with the user channel program 
GP2 general purpose byte 2 
GP3 general purpose byte 3 


EL(R) extended record residual length (for the first record extension, is equal 
to the total record length) 


trailing blanks are suppressed 


Figure 3-21. Data Record 
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The Job Header, Job Trailer and Data Set Header contain information which is 
required for job routing, execution, printing, punching and accounting. 


BASIC HEADER/TRAILER FORMAT: The basic organization of the Job Header or Job 
TRailer records is shown in Figure 3-22. 


as 

| LENGTH | Length of Header/Trailer (two bytes) 
| 

| FLAG | Flag byte (one byte) 

| SEQ. | Sequence count (one byte) 


—_-— 


| | 
| | 
| | General Section (always present) 
| | 
| | 
| 


| | 
| | 
| | First subsystem section (optional) 
| | 
| | 


—_— 


Second subsystem section (optional) 


| | 
| | 
| | Last subsystem section (optional) 
| | 
| | 


Figure 3-22. Job Header and Job Trailer Format 

JOB HEADER AND JOB TRAILER: The Job header record contains four types of infor- 
mation relating to the job as a whole: 

: Identification (job name, job number, originator's name) 


: Routing Control (execution node name, default print/punch node and remote 
names). 
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e Put data record (IPWSSPD) 
Retrieval on the queue and data files is performed by the function routines: 


Get next queue set (IPWS$NQ) 
: Get data record CIPWSSGD) 


The reserve queue record function obtains the first record from the free queue 
chain and updates the pointer in the master record to the next record in this 
chain. If the queue file is exhausted, that is, no free queue record is avail- 
able, the task is placed in a wait state until queue records in use are returned 
to the free queue chain of a specific queue. 


The add queue set function inserts, by means of its next and previous pointers 
a new queue entry in the appropriate class chain of a specific queue. 


If the execution node for a job (that is the system upon which the job is to be 
executed) or the destination node for list or punch output is not the local 
node, the job or output is placed in the transmission queue (XMT). This queue 
consists of two entries: One for jobs and one for output. The queueing is per- 
formed on a priority base only. 


The output-available flag is set in the line control block or logical unit con- 
trol block (LUCB) when the output is destined for a remote terminal that is cur- 
rently logged on (terminal or logical unit). 


When a job or output is destined for processing by a specific SYSID in a 
shared-spooling environment, the SYSID class table is updated depending upon the 
specification of the class and SYSID. 


If a job or output is destined for another node in the network, a check is made 
if a connection exists to the prime route node. If so the first inactive trans- 
mitter found is posted. If no such connection exists, a check is made if a con- 
nection exists to the alternate route node. If so, the first inactive 
transmitter found is posted. 


If the destination of the job or output is unknown, the local operator, and the 
originator if Notify was specified, are informed via message 1RAI1I and the job 
or output is put in hold status in the XMT queue. 


The delete queue set function removes a queue entry, which is no longer 
required, from its class chain. The free queue set function returns the queue 
records to the free queue set. 


The put data record function moves a logical record into the output area for a 
physical record on the data file. If the output remainder is not large enough 
to contain this logical record, the output area is written to the data file as a 
physical record. If the track group or block group is exhausted, a new queue 
record is obtained from the free queue set (explicitly coded without invoking a 
function). 


If the data record is larger than the DBLK size - 8 bytes, the record is split 
into record extensions that fit in the data block. 
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till it is available (by issuing IPWSWFL macro to task management). If the 
resource is available, ownership of the resource is established by storing the 
address of the TCB of the owning task in bytes 1 to 3 of the lockword. 


If the resource to be exclusively reserved is either the DMB or the ACB, and the 
resource is not available, and it is a shared environment, the work-to-do ECB is 
posted in order to interrupt the T3 time interval. 


displacement 28 (Decimal) 


ee OL 


address 
FFT of TCB 
0 1 3 


(any resource control block) 





Figure 3-23. Resource LOCKWORD of a VSE/POWER Control Block. 


Release Resource 


This service is entered when a VSE/POWER task issues a IPWSRLR macro 
instruction. 


The resource lockword owner address is examined. If the task issuing the 
release request is not the resource owner the request is ignored. Otherwise, 
the lock byte in the resource lockword is set to zero so that the resource 
becomes available for use by any other task that may require it. 


Real Storage Management 


Storage management controls the permanently fixed storage allocated via the 
'ALLOCR command to the VSE/POWER partition. Work space in the fixable area for a 
task is reserved and released as requested by the calling routine. 


The storage control block (SCB), with storage assignment table (isomorphic map 
of all pages in fixed area), page control blocks and associated buffer control 
words (BCWs) are used to control the availability of pfixed address storage in 
the VSE/POWER partition (see Figure 3-24 ). The SCB is locked during handling 
reserve/release request. 
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Virtual Storage Management 


Virtual storage management controls the GETVIS storage allocated to the 
VSE/POWER partition. Work space in the GETVIS area for a task is reserved and 
released as requested by the calling routine. Storage management makes use of 
the subpooling possibilities to control storage allocation. The smallest unit 
of storage that may be reserved is 128 bytes. 


Reserve Virtual Storage 


The reserve-virtual-workspace service is entered when a VSE/POWER task issues a 
reserve virtual storage (IPW$RSV) macro instruction. The macro permits the 
caller to specify a pool type with the request. 


The service routine rounds up the requested length of the workspace to a multi- 
ple of 128 and selects the subpool anchor, according to the type specified by 
the caller. If the caller demanded alignment of the workspace on page boundary, 
the appropriate request is passed to VSE/Advanced Functions. 

If workspace is available the routine clears the storage area, allocates it to 
the caller and initializes the workspace header (also referred as virtual buffer 
control area). The header contains control information used by virtual storage 
management and precedes each acquired piece of storage. | 

The workspace is chained as last entry in one of following queues: 

e own task queue (head and tail pointer are contained in task TCB) 


° other task queue (head and tail pointer are contained in TCB of other task) 


e system queue. (head and tail pointer are contained in the virtual storage 
control block or any other major control block). 
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Release Virtual Storage 


The release-virtual-workspace service is entered when a VSE/POWER task issues a 
release virtual storage (IPWSRLV) macro instruction. The routine removes the 
storage area from the virtual storage queue and frees the storage area by issu- 
ing the VSE/Advanced Functions FREEVIS macro. If the storage area to be freed 
is not a member of the task virtual storage queue, the head and tail address 
must be provided by the caller. The routine posts the virtual storage ECB to 
show that storage is now available and returns to the caller. 


Unchain Virtual Storage Element 


The unchain-virtual-storage service is entered when a VSE/POWER task issues an 
unchain virtual storage (IPWSUNV) macro instruction. The routine performs two 
functions: 


1. A specific storage element, addressed by register 1, is removed from the 
specified virtual storage queue and chained to another queue. 


2. The first element of a specified queue, if any, is unchained and chained at 
the tail of the issuing task virtual storage queue. The address of the ele- 
ment is returned in register 1. If the queue is empty, register 1 is set to 
zero. 


Message Service 


Local Message Service 


The local message service is invoked by a IPWSWTO or IPWSWTR macro instruction 
issued by the calling routine. It performs a console write operation or a write 
operation followed by a read operation, defined by information supplied by the 
calling routine in the message request word located in the TCB. (See 

Figure 3-26). The message request word and reply request word contain the 
addresses of message and reply areas of the calling routine. 


There is a message control block (MMB), which is locked for the duration of the 
operation. It contains the channel program, the CCB, the message output area 
and the reply input area. 


Message service is also used to obtain a message from the message definition 
module, which contains most local and remote messages, by the use of the IPWSGAM 
macro instruction. It performs one of the following functions: 


Move message into user-supplied area 
Return message address 

Write message to central operator 
Add message to remote message queue 
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¢ Local operator 

° Any remote operator locally attached 
e Any local VSE/ICCF user 

e Any user on another node 


The message id, target node and remote name, if applicable, are supplied by the 
calling task in the message request word and in register 0. 


Note: No information is passed back to the calling task on whether or not the 


message was sucessfully queued. 
The variable portions of the message text are converted to indicate information 
pertinent to the specific task or queue entry when combined with this message. 
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Figure 3-27. Disk Management Control Blocks Relationship 


Tape Service 


Tape service is invoked by IPWSWIT, IPWSRDT, or IPWSCTT macro instructions 
issued by the calling routine. It reads or writes records to tape file, or per- 
forms a tape control operation defined by information supplied by the calling 
routine in the tape control block (TBB). The TBB is associated with the tape 
device and contains the skeletal channel program. See Figure 3-28. 
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gets control, it checks if a timer interval is expired. If so, the interval tim- 
er routine is invoked which de-queues expired TQE's and posts associcated tasks 
for work. 


Validation Service 


Validation service is invoked by the IPWSVDA macro instruction. The data 
address and its associated length which are provided in the user- supplied chan- 
nel command word and the address of the CCW itself are examined to ensure that 
they relate to a data area that the user is allowed to access. 


The user is allowed to access the user's partition, the logical transient area, 


and the shared virtual area, for read, write, or control operations. This is 
illustrated in Figure 3-29. 


a Ne ae Ne arg ee een ee ages ay ee 


| |User Partition | LTA | SVA | 
| DATA AREA | Valid | Valid | Invalid | 
ee ee 

| CCB | Valid | Valid | Invalid | 
SSS SS 
| Channel | Valid | Valid | Valid | 


| Program (CCW) | 
Figure 3-29. Areas Checked by Validation Service 


Remote Service 


Remote service is invoked by the IPWSSRM macro instruction. Depending on the 
option specified, the bit representing the remote id is either turned on or off 
in the remote bit mask. The remote bit mask indicates which remote users are 
signed on at any time. 


Get Trace Entry 


This routine is invoked by the IPWSGTE macro instruction. The routine allocates 
a trace entry from the VSE/POWER trace table and returns its address in register 
1 to the caller. If the current trace area is filled, the routine swaps to the 
alternate trace area and if trace logging was requested, a IPWSIAS TYPE=SERVICE 
macro instruction is issued to dump the filled trace area to the VSE/Advanced 
Functions dump file. Figure 3-30 shows the two trace areas and how they are 
used. 
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For 
ter 


Queue remote messages (BSC and SNA) to the remote message queue. 

If the message is in NMR format, the originating node and/or remote/user id 
are put in front of the actual message. The message is truncated to its max- 
imum length if applicable. Message modification is performed, if appicable 
by executing the IPWSGMS TYPE=SUB macro instruction. Then the message text 
is examined and multiple blanks are deleted from the text. Finally the mes- 
sage is anchored by means of a message index to the line control block if 
BSC or logical unit control block if SNA respectively. 


Delete messages from the queue when it is completely full with pending mes- 
sages. 

When the remote message queue is full (255 entries) with pending messages, 
it is assumed that somebody is monopolizing the queue. This can be the case 
when a remote printer has not ‘been ready for a while. All messages for that 
remote user are deleted and replaced by message 1R20I1. 


Display ALLUSER-type messages by passing them to the command processor. 
Delete ALLUSER-type messages. . 


Queue ALLUSER-type messages to the ALLUSER-type message queue. The ALLUSER 
type message queue contains only a limited number of entries (15). When the 
queue is full, the queue request is rejected. 


Delete BSC messages from the LCB subchain. 
Locate the first pending message for a specific BSC or SNA user. 
Delete SNA messages from the SNA delete subchain. 


Delete SNA messages temporarily by moving the entries from the SNA live sub- 
chain to the SNA delete subchain. 


Add temporarily deleted SNA messages to the SNA live subchain. 


nodal message requests, the function to be performed is indicated in regis- 
0. The following functions are performed: 


Add nodal message record to appropriate node control block. 

On entry the routine acquires storage to hold the NMR to be queued. If no 
storage could be obtained, the routine returns to the caller with R1=4. Oth- 
erwise the message text is copied from the NMR to the just acquired storage 
area. If the NMR contains a message, originated from the local node, message 
modication is invoked by issuing the IPWSGMS TYPE=SUB macro instruction. 

The Network definition table is scanned to find the prime and, if specified, 
the alternate route node name. The NCB chain is now scanned to check if a 
connection is established with one of these nodes. If so, the NMR is queued 
at the tail of the message queue on this NCB. The network driver is then 
posted, to attach a console transmitter task, if one does not already exist. 


Build nodal message record and add it to appropriate node control block. 

On entry, the routine locates the message to be sent in the message defi- 
nition module and acquires storage to hold the message. If no storage could 
be obtained, the message is discarded. Otherwise the message text is copied 
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Figure 3-31 (Part 1 of 2). Message Modification Characters and Action Table 
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celed and the operator is informed via message 1Q08I. Next, the connection to 
VSE/ICCF is established. If VSE/ICCF is not yet active, the Notify task waits 
until VSE/ICCF is brought up and itself tries to establish the connection to 
VSE/POWER. After the connection with VSE/ICCF is established, the first message 
is removed from the Notify message queue and a 'send' is initiated. Once 
VSE/ICCF successfully retrieves the message, the storage occupied by the message 
is freed. This process continues until all messages are sent. 

If, meanwhile, the connection to VSE/ICCF breaks due to VSE/ICCF normal/abnormal 
termination, the Notify task attempts to re-connect to VSE/ICCF, however this 
connection might never complete. 


If a severe error is encountered while sending messages to VSE/ICCF the Notify 
support is terminated, the message queue is emptied, all storage is freed and 
the operator is informed via message 1Q4BI. The Notify task is posted for imme- 
diate termination at VSE/POWER termination by the IPWSS$T1 module. 


Asynchronous Service 


The asynchronous service function of VSE/POWER handles all of the following 
requests: 


SETPRT 

LFCB 

OPEN/EOV/CLOSE 

LOAD 

Dump particular storage areas 
Communicate with the Librarian 


This is done for the following reasons: 


1. Most of the called VSE/Advanced Functions service routines run in the SVA 
under the TIK of the VSE/POWER main task. Any page fault which occurs cannot 
be correctly handled by the VSE/POWER page fault overlap processing, because 
the register convention used by the VSE/Advanced Functions service routines 
do not match the VSE/POWER requirements. 


2. Any I/O done by the VSE/Advanced Functions service routines would cause the 
complete VSE/POWER partition to be put into the wait state until the I/0 
completed. 


3. Any SVC-call would cause the VSE/POWER main task to wait until the service 
request completed. 
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When a service request is issued by a VSE/POWER task, the service request block 
(pointed to by register 1) is chained as the last entry in the appropriate ser- 
vice request queue, and the corresponding subtask is posted. The asynchronous 
service anchor block (ASAB) is unlocked and the task waits for the completion of 
the service request. After the completion of the service request, its ECB is 
posted by the subtask. The return code set by the subtask is analyzed and the 
appropriate action is taken. 


The asynchronous service function is serially reusable and is locked for the 
duration of the appropriate function (ATTACH, DETACH, or SERVICE). 


COMMAND PROCESSOR 


The command processor (IPW$$CM) will be under control either of a permanent TCB 
located in the first page of the fixable area or a temporary TCB in the fixable 
area. 


The permanent command processor task is invoked by the attention interface 
appendage when an operator command is received from the console. 


The temporary command processor task is invoked by the IPWSICP macro interface 
instruction. 


On entry of the command processor the command to be analyzed and acted upon is 
contained in a command processor control block (CPB), which is part of the task 
control block (TCB). 


On exit, the temporary command processor task detaches itself and the permanent 
command processor task will place itself in inactive state. The permanent com- 
mand processor has the highest priority of all common tasks in the task 
selection list. It enables the operator to maintain control over the VSE/POWER 
partition in extreme circumstances. 


Initiation of the Permanent Command Processor Task 


The attention routine $S$BATTNA will pass control to the attention interface 
appendage in IPWSSNU for a potential VSE/POWER command. In the appendage routine 
the command is verified and stored with its operands in fixed positions in the 
command processor control block (CPB). The command processor task is set 
dispatchable and normal return to S$BATTNA is taken. 


In the case of an invalid command or if the command processor is already active 


an error return to S$$BATINA is taken, resulting in an invalid-statement message 
or a routine-active message, respectively. 
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FLUSH 
GO 
RESTART 
SETUP 
SIGNOFF 
START 
STOP 


The following commands are processed for BSC by the IPWSSBR BSC reader: 


SIGNON 
SIGNOFF 
START 
STOP 

GO 
SETUP 


The remaining commands are given to IPWSSCM for processing. The main processor 
is responsible for de-coding each command and performing the processing neces- 
sary to cause appropriate action to the operator's request. A command table, 
containing the long and short form of the command verb, is used to determine the 
subprocessor to be entered. If the end of table is encountered or no subprocess- 
or entry point address is present, the command is considered to be invalid. 

Each entry in the table may have restriction indicators as follows: 


° command not allowed during VSE/POWER shutdown period 
° command not allowed at autostart time 


If one of the conditions is true, the command is rejected. After processing the 
command, control is returned to task management service. 


The following command processing routines exist: 
PACCOUNT The following functions are performed by the PACCOUNT command: 


° Builds a TCB for a save account task which will save or delete the 
account file IPWSSSA (IPSSSSF if account file resides on an FBA 
device). 


° Conditionally assigns a free program LUB entry. 
° Reserves work space for the TCB and attaches it. 


PACT Activates the specified transmitter or receiver and makes it available 
for network activity. 


PALTER Removes if necessary the queue sets specified in the command from 
their class chains (via IPWSDQS); then SYSID, destination, userid, 
priority, disposition, class, number of copies, remote ID, and com- 
paction table name can be changed. Finally, the queue sets are 
returned to the appropriate class chains (via IPWSAQS macro instruc- 
tion). 

PALTER also changes the class(es) of an active partition. 
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PGO Posts the ECB in the TCB for the task specified in the command pro- 
vided that the task was waiting for operator response (task status 0). 


PHOLD Takes one or more VSE/POWER jobs out of the dispatchable state and 
puts them in the hold/leave state. 


PINQUIRE displays status information for RJE lines/sessions and the network 
status: 


° Not supported (no line table entry exits) 
e Not initiated (no line control block or SNA control block exists) 
° Inactive (no sign-on) 
e Processing RJE-ID (sign-on) 
° Status of each connection to other node 
e Status of each transmitter/receiver 
- active 
= inactive 
- drained 


- Halting (in process of closing down) 


PLOAD Loads the specified Network Definition table from the VSE/Advanced 
Functions library. 


POFFLOAD Creates a TCB according to the first parameter specified 
(RDR-TCB=LOAD, LST-TCB=SAVE), sets up a parameter list in the just 
created TCB and attaches the related TCB. 


PRELEASE Changes the disposition of the queue sets specified in the command: 
e Disposition H (hold) to D (dispatch) 
° Disposition L (leave) to K (keep) 


PRESET Resets the in-execution flag for all jobs or output belonging to the 
sysid that was specified in the command. 


PRESTART Stores the number of records to be skipped, and in the case of a 
3800 Printer also stores the new copy group index to be used, in the 
TCB of a local or remote writer task according to the operand specifi- 
cations. It also posts an index (type of skip) to this TCB: 


X'04' restart processing of the queue entry with specified record 
number. 

'08' skip as many records forward as specified. 

‘oc' skip as many records back as specified. 
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Account File Processing 
Operations on the account file are performed by two functional routines: 


e The put account function (IPWSSPA for C-K-D devices, or IPWSS$PF for FBA 
devices) invoked by an IPWSPAR macro instruction, 


¢ The get account function (IPWS$GA for C-K-D devices, or IPWSS$GF for FBA 
devices) invoked by an IPWSOAF, IPWSGAR, or IPWSCAF macro instruction. 


The put account function routine will accept account records for the VSE/POWER 
partition and the partitions running under control of VSE/POWER (see 

Figure 3-32). The account records (VARUNB format) will be written to the 
VSE/POWER account file under control of the account control block (ACB). The 
remaining file capacity is checked against a 20% limit. A warning message is 
issued if the limit is exceeded. 
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If the remaining capacity of the account file does not allow to store a pre- 
sented record, the task concerned is placed in a wait state (wait for ECB post- 
ing in account control block), until the account file is emptied by the save 
account task. 


The get account function routine, as used by the save account function, is bro- 
ken down into three operations: 


° Open account file for get mode processing, invoked by IPWSOAF macro instruc- 
tion. This function is not supported for FBA devices. 


° Get account record to retrieve the next sequential record from the account 
file, invoked by IPWSGAR macro instruction. This function is not supported 
for FBA devices. 


° Close account file to restore the mode for put account record processing, 
invoked by the IPWSCAF macro instruction. For FBA devices, this function 
writes an SEOF (software end of file) to the account file. 


Open Account File 


The account control block is initialized for read operations (get mode) to 
retrieve the first record of the account file. 


Close Account File 


The account file records are erased by writing EOF records on each track for 
C-K-D devices or on the first block for FBA devices. The account control block 
is initialized to start on the first record in the account file. The task(s) 
waiting for posting of the ECB in the account control block are now allowed to 
continue processing. 


Save Account Task 


The save account task is attached by the command processor after a PACCOUNT com- 
mand is given. The save account routine, IPWSSSA for C-K-D devices or IPWSSSF 
for FBA devices, is entered when the task gets control. Its purpose is to empty 
the account file, erase it, or save it on another storage medium (disk, tape, or 
punch queue). 


3. Program Organization 3-73 


Licensed Material - Property of IBM 


First it checks if there are buffers queued, by the VSE/POWER BSC channel end 
appendage or ACF/VTAM Send or Receive Exits, on the buffer queue anchored to the 
PNET Driver TCB. If so, the buffers are re-ordered from LIFO to FIFO sequence. 
Each buffer is then processed by IPWSSLD1, for BSC nodes, or IPWSSLD2, for SNA. 
nodes. 


When all buffers are processed, a check is made for the presence of ACF/VTAM 
related events and IPWSS$LD4 is called to process them. Looping through the 
nodes (as represented by the chain of node control blocks), checks are made for 
actions requested for a node and if found the request is passed to module 
IPWSSLD3. A further check is then made for buffers to process before testing if 
the ACF/VTAM Interface may be closed in IPWSSLD4. The PNET Driver waits to be 
posted for work to do and when dispatched continues the loop. 


The PNET Driver detaches itself when there are no active nodes and ACF/VTAM 
interface is closed. 


PNET BSC Buffer Processing (IPWSSLD1) 


This module handles all buffers sent and received when the nodes are connected 
via a BSC line. A multi-leaving (MLI) line discipline is used to control the 
line. Each buffer completed is checked for errors. 


If the buffer is found to be in error or contains information that the remote 
found an error, recovery is attempted. If the error is found to be unrecovera- 
ble or cannot be recovered within the retry limits, the node is flagged for ter- 
mination. 


If the buffer is found to be error free, it is analysed to see if it contains 
data records or NJE stream control information. Data buffers are queued to the 
proper receiver. 


If the buffer contained NJE stream control information then the proper actions, 
like flagging a receiver creation or flagging and posting of transmitters and 
receivers, etc., is performed. 


The module then invokes the BSC I/O manager to execute the next Send-Receive 
operation. 


PNET SNA Buffer Processing (IPWSSLD2) 


This module handles all buffers sent and received within an SNA session (estab- 
lished by module IPWS$S2 when the node was started). For SNA, a buffer also 

contains the RPL used to send or receive the data, which is then checked for an 
error and if found the node is flagged for termination and the buffer is freed. 


If a SEND completes without error the buffer is freed after effecting any status 
change for transmitters or receivers as indicated in the buffer. 


If a Receive completes without error, the RPL is first analysed for ACF/VTAM 


commands and if any is found then the node is flagged for termination. 
Non-command buffers are then analysed in the same way as in IPWSSLD1. 


3. Program Organization 3-75 


Licensed Material - Property of IBM 


Request Termination of Transmitters and Receivers 

Delete a Node from Node Attached Table (NAT) 

Attach a VSE/POWER task for Session Creation/Termination 
Request Timer Events from Timer Services 


PNET Initialization 


If PNET= is specified in the POWER macro, the VSE/POWER initialization processor 
calls the PNET Initialization phase (IPWSS$IN). This module 


° sets up the PNET master control block(PNCB) and stores its address in the 
CAT. 


e loads all PNET phases (BSC and SNA) in the pageable area after the last 
loaded phase for the local part. 


¢ Loads the Network definition table, in the GETVIS area, by invoking the 
PLOAD command processor. 


Note: The PLOAD command processor checks if the Network definition table 
is valid. 


e Acquires virtual storage for the temporary node attached table(NAT). This 
table is used as interface between the PNET Driver and the Timer task and 
contains entries for each node which was signed-on or signed-off since the 
last time interval. The timer task updates the NAT-table contained in the 
Master record according to the entries found in the temporary NAT-table. 


Note: The temporary NAT-table is only acquired in a shared spooling envi- 
ronment. 


If an error occurs during PNET initialization, the appropriate error message is 
written to the system console operator and VSE/POWER is terminated normally. 


PNET STARTING A BSC CONNECTION: The control flow with VSE/POWER when a BSC con-- 
nection to another node is established, is shown in Figure 3-33 on page 3-78 


PNET STOPPING A BSC CONNECTION: The control flow with VSE/POWER when a BSC con- 
nection to another node is terminated, is shown in Figure 3-34 on page 3-79 
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is issued including the reason codes causing the failure. The reason codes are 
taken from the ACF/VTAM RPL RTNCD and FDBK2 fields. The ACF/VTAM interface is 
closed the PNET Driver ECB is posted and the subtask is detached from VSE. 


SUCCESSFUL ENABLING OF THE ACF/VTAM SCIP EXIT.: Message 1REOI is displayed to 
inform the operator that the ACF/VTAM interface has been opened successfully and 
that session requests can be sent to, and received from, remote nodes. 


The VSE subtask IPWS$$S1 posts the PNET driver ECB and issues a VSE/Advanced 
Functions WAIT. The subtask remains in the WAIT until it is posted by the PNET 
Driver to perform the disabling of the SCIP exit and to close down the ACF/VTAM 
interface. 


Disabling the ACF/VTAM SCIP Exit. 


The ACF/VTAM SCIP Exit is quiesced when no more session requests originating 
from remote nodes can be accepted, for example after a PEND has been issued by 
the operator. 


The ACF/VTAM SETLOGON QUIESCE request is issued and the subtask IPWS$$S1 enters a 
wait state again until it is posted in order to perform the CLOSE request. 


ACF/VTAM SETLOGON QUIESCE FAILURE.: VSE/POWER could not quiesce the ACF/VTAM 
SCIP exit. i.e. session requests issued by remote nodes can still be received. 
Error message 1RD4I is issued including the reason codes causing the failure. 
The reason codes are taken from the ACF/VTAM RPL RTNCD and FDBK2 fields. The 
ACF/VTAM interface is closed and the the PNET Driver ECB is posted and the sub- 
task is detached from VSE. 


Closing the ACF/VTAM Interface 


The subtask IPWS$$S1 is posted by the PNET driver in order to close down the 
ACF/VTAM interface by means of the ACF/VTAM CLOSE macro. Message 1RE1I is 
issued after successful completion of the CLOSE request indicating that no more 
PNET SNA functions can be performed. 


ACF/VTAM CLOSE FAILURE.: The ACF/VTAM interface could not be closed properly. 
Error message 1RD5I (including the reason code) is issued. The reason code is 


taken from the ACF/VTAM ACB Error Field. The PNET Driver ECB as well as the 
VSE/POWER Master ECB are posted and the subtask is detached from VSE. 


PNET Session Establishment 
The IPW$$S2 routine is invoked in order to establish a session between the local 
and the remote node either on behalf of a primary or of a secondary application 


program. It is attached as a VSE/POWER task by the PNET Driver. 


The IPWS$S2 routine performs following functions : 
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Both nodes have to agree on the buffersize used during data transfer between the 
two nodes and the process is as follows: 


The node with the higher nodename sends the NJE Type 4 FM Header which con- 
tains the buffersize as defined in the NCB. 


The node with the lower nodename receives the NJE Type 4 FM Header and sends 
its own FM Header including the buffersize as defined in its NCB. 


The node with higher nodename receives the NJE Type 4 FM Header. 


Both nodes compare their own buffersize with the remote buffersize and the 
smaller of the two values is used for data transfer between the two nodes. 


The IPWS$S2 task is detached after succesfull exchange of the buffersizes. 
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3-36. PNET SNA Session Establishment. For Non-first node. 


Two cases have to be distinguished 


1. The NCB will be kept, which means that the local PNET system will be able to 
receive a session request from this node. Error message 1RD9I is displayed 
indicating the reason code and message 1RC6I is displayed indicating the the 
local node remains in a pending status. 

2. The NCB will not be kept, which means that an unrecoverable error has 


SEND/RECEIVE ERROR DURING FM HEADER EXCHANGE : 


occurred. Error message 1RD8I is displayed indicating the reason of the 
OPNDST failure. 


Two cases have to be distin- 


guished 


1; 


An ACF/VTAM error has occurred which means that the exchange of the FM Head- 
ers has not been successful. Error message 1RD8I is displayed indicating 
the reason code and the session has to be terminated by the IPWS$S3 task. 


Invalid data (incorrect or no FM Header) has been received. 
1RD9I is displayed indicating the reason of the failure. 
be terminated by the IPWSSS3 task. 


Error message 
The session has to 
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Figure 3-37. PNET SNA Remote Initiated Session. 


ACF/VTAM OPNSEC ERROR: The NCB is not kept which means that an unrecoverable 


error has occurred. Error message 1RD8I is displayed indicating the reason of 
the OPNSEC failure. 


A VARY NET, INACT,SID=applid,TYPE=FORCE should be entered in order to terminate 
the session. 


Secondary Application Program Rejects Session Request. 
The operator at the remote console has entered the 
PSTART PNET,nodeid(,nodepassword) 


command. 
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SSENSMO=X'21' Invalid session parameters. 


This system sense information is displayed at the remote console with error mes- 
sage 1RD9I. 


The IPW$$S2 task detaches itself from VSE/POWER after successful completion of 
the SESSIONC request. No session has been established. 


Error message 1RD8I is displayed in case of SESSIONC failure. The still out- 
standing session request should be terminated by entering VARY 
NET , INACT ,SID=nnnnnnnn , TYPE=FORCE. 


PNET Session Termination 


The IPW$$S3 routine is invoked in order to terminate a session which has been 
established by the IPW$$S2 routine. It is attached as a VSE/POWER task by the 
PNET Driver. 


The IPWS$$S3 routine performs following functions : 


1. terminates a session in behalf of a primary application program by issuing 
the ACF/VTAM CLSDST request. 


2. terminates a session in behalf of a secondary application program by issuing 
the ACF/VTAM TERMSESS request. 


3. receives the session termination request from the primary application pro- 
gram and acts on behalf of a secondary application program. The IPWS$S$S3 
routine receives the UNBIND command. 


4. receives the session termination request from the secondary application pro- 
gram and acts on behalf of a primary application program. The IPWS$S3 rou- 
tine receives the LOSTERM RC=20 condition. 


Primary Application Program Terminates the Session 


The operator at the local console enters a PSTOP PNET,nodeid command or another 
condition (like ACF/VTAM Halt) leads to a termination request. The general log- 
ic flow is shown in Figure 3-38. 


The PNET Driver attaches the routine IPW$$S3 as a VSE/POWER private task. The 
task waits for the completion of the IPWS$$S2 task which has established or which 
is just establishing the session. The necessary ECB is located in the NCB 
representing the session. 


The ACF/VTAM request CLSDST is issued to disconnect the application programs 
located on the local and remote node. The CLSDST request causes an UNBIND com- 
mand to be sent to the remote secondary application program (via the ACF/VTAM 
SCIP Exit) thus informing the secondary application program about session termi- 
nation. The NCB is flagged to indicate that it can be freed by the PNET Driver. 
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The primary application program has to issue an ACF/VTAM CLSDST request so that 
- the session is terminated. The secondary application program receives an UNBIND 
command for which it has waited after issuing the TERMSESS request. 


The NCB is flagged that it can be freed by the PNET Driver. The PNET Driver ECB 
is posted and the IPWSS$S3 task detaches itself from VSE/POWER The SNA Session 
Control Block (SSCB) is freed later by the PNET Driver. 


Primary Application Program Receives Session Termination Request. 


The operator at the remote console enters PSTOP PNET,nodeid command or another 
condition (like ACF/VTAM Halt) leads to a termination request. The general flow 
is shown in Figure 3-39. 


The PNET Driver attaches the routine IPWS$S3 as a VSE/POWER private task. The 
tasks waits for the completion of the IPWS$$S2 task which has established or 
which is just establishing the session. The necessary ECB is located in the NCB 
representing the session. 


LOSTERM condition with reason code 20 has been passed to. PNET through the 
ACF/VTAM LOSTERM Exit. A CLSDST request ( as described above) has to be issued 
in order to terminate properly the session. The CLSDST request causes an UNBIND 
command to be sent to the remote secondary application program (via the 
ACF/VTAM SCIP Exit) thus informing the secondary application program about ses- 
sion termination. The NCB is flagged that it can be freed by the PNET Driver. 
The PNET Driver ECB is posted and the IPWS$$S3 task detaches itself from 
VSE/POWER. The SNA Session Control Block (SSCB) is freed later by the PNET 
Driver. 
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freed by the PNET Driver. The PNET Driver ECB is posted and the IPWS$$S3 task 
detaches itself from VSE/Advanced Functions. The SNA Session Control Block 
(SSCB) is freed later by the PNET Driver. 


ACF/VTAM CLSDST OR TERMSESS FAILURE.: In case an ACF/VTAM error has been 
encountered during execution of the CLSDST or TERMSESS request, error message 
IRD8I is issued including the reason code (which consists of the RPL RTNCD and 
FDBK2 codes. Error message 1RC4I will be displayed when ACF/VTAM suffers from 
temporary storage shortage and cannot perform the requested function. 


The console operator should try to cancel the still existing session by using 
the VARY NET, INACT,SID=xxxxxxxx , TYPE=FORCE 


PNET ACF/VTAM Exits 


The module IPWSSSE contains the ACF/VTAM Exit Routines for the PNET SNA Support. 
The following exits are supported: 


SCIP 
NSEXIT 
LOSTERM 
TPEND 


The exits are required to handle the special events scheduled by ACF/VTAM. 


The exit routines run under control of the VSE/Advanced Functions subtask under 
which the ACF/VTAM OPEN was performed. During OPEN time the exits are enabled to 
ACF/VTAM via the SETLOGON command issued by module IPWSSS1. 


Because the exits run under the control of the VSE/Advanced Functions subtask 
and cannot share VSE/POWER resources, all events which cause an exit to be 
scheduled are passed to the PNET Driver by setting various indications in con- 
trol blocks. The following exit routines are supported and perform the follow- 
ing functions. 


SCIP Exit 
The SCIP exit is scheduled in the following circumstances: - 
° BIND Request Unit 


As part of the session establishment an OPNDST command is executed which 
triggers the sending of a BIND-RU to the other end of the session. The 
received BIND-RU causes ACF/VTAM to schedule the SCIP-Exit with a parameter 
list containing the address of the received BIND-RU. 


The BIND-RU is used to form a Session Request Element (SRQE) in the GETVIS 
Space of the VSE/POWER partition. The SRQE is chained to the PNET master 
control block (PNCB) and the PNET Driver is informed that a remote session 
request has arrived. 
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The following situations cause the LOSTERM Exit to be scheduled: 


20 


32 


12 


36 


The secondary end issued a TERMSESS... TYPE=UNCOND Command to termi- 

nate the session. ACF/VTAM at the primary side schedules the exit. In 
this case, the exit informs the PNET Driver to terminate the session 

immediately. 


Network Operator initiated conditional terminate. 


This event causes the PNET Driver to be informed that a conditional 
terminate should take place, which implies that all transmitter and 
receiver tasks may continue until end-of-job, before the session is 
terminated. 


Network Operator initiated ACF/VTAM HALT. 

This event causes an immediate termination of ACF/VTAM. The PNET Driv- 
er is informed that ACF/VTAM is terminating immediately and propagates 
an immediate termination to all PNET SNA sessions. 


ACF/VTAM Buffer Limit exceeded. 


If the buffer limit defined by the NCP Generation is exceeded, the 
exit is scheduled. This event causes immediate termination of the ses- 
sion and the PNET Driver is informed about this event. 


The operator is informed with message 1RD7I that the LOSTERM exit has 
been scheduled. 


NSEXIT Exit. 


The CLEANUP-RU is the only type of RU which is supported in this exit. A 
CLEANUP-RU is created by ACF/VTAM under the following circumstances: The gener- 
al flow is shown in Figure 3-40. 


Operator initiated. command: 

VARY NET,INACT..... 

VARY NET, TERM,SID=nnnnnn,TYPE=FORCE or 
Unexpected CLOSE issued from application. 


The received CLEANUP-RU leads to an immediate termination of the session. The 
exit informs the PNET Driver about this situation. 
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PNET SEND/RECEIVE Function 


The SEND and RECEIVE functions of the PNET-SNA support are located in the module 
IPWSS$SR. This module also contains the SEND/RECEIVE exit routines for asynchro- 
nous processing. The functions are called either: 


: by the PNET Driver, in which case the routines run under control of the 
calling task TCB acting as a function module. 


— The PNET Driver calls the SEND function by means of the IPWSIOM macro 
instruction when at least one output buffer has been queued by the PNET 
Driver into the 'TO-BE-SENT AHEAD' queue and no SEND is currently in 
progress. 


- The PNET Driver calls the RECEIVE function by means of the IPWSIOM macro 
when at least one input buffer has been queued by the PNET Driver to the 
"FREE INPUT AHEAD' queue and no RECEIVE is currenlty in progress. 


¢ by the SEND/RECEIVE exit routines, which are scheduled by ACF/VTAM after 
final completion of the request, by means of the IPWSIOM macro instruction. 


Note: Both the exits as well as the invoked SEND/RECEIVE functions run 
under control of the PNET SNA subtask (IPW$$S1). 


The following technique is used to prevent concurrent SEND/RECEIVE being exe- 
cuted: 


If the SEND or RECEIVE functions are called from the PNET Driver, the function 
gates are locked and remain locked until no more buffers are available to send 
or to receive requests or responses. Due to asynchronous processing, the . 
SEND/RECEIVE exits are scheduled by ACF/VTAM at final completion time. The cur- 
rently held input or output buffer is queued to the PNET Driver ‘BUFFER QUEUE' 
for later processing. The SEND or RECEIVE exit then initiates a new SEND or 
RECEIVE request by executing the IPWSIOM macro. The appropriate function gate 
remains locked unless an error is detected or no buffer can be sent or received. 


Two additional queues are introduced, for performance reasons, in the SNA proc- 
essing: 


e To be sent ahead queue 
° Free input ahead queue 


The queues provide the capability to initiate another SEND/RECEIVE from the 
appropriate exit which runs under the TIK of the PNET SNA subtask. The normal 
input/output buffer queues are maintained by buffer service using the VSE/POWER © 
resource management which is not available when running as VSE/Advanced Func- 
tions subtask. 


The ‘ahead' queues are filled by the PNET Driver on demand of the SEND/RECEIVE 
function invoked by the exits. Once a SEND/RECEIVE has been initiated by the 
PNET Driver, the next SEND/RECEIVE is automatically issued by the exit when the 
previous has finally completed. This process continues until no buffers are 
available or an error has been encountered. 


3. Program Organization 3-97 


Licensed Material - Property of IBM 


SUA SEND PUNCTION 


TRANSMITTER TASK <-------- Attached from PNET DRIVER 
** If Jop or Output eiig ibis 

for transmission 

Transpitter was  Sttached 

by the P¥ZT Driver. 
--->| 1. ACquire Buffer from emma aera n cen weet cercrer= 

Buffer Management <-- BUFFER MANAGEMEWT (IPWSSBS) 

Function (BUF) . ai pape ata talonbe eneiebeeabipsetalen seine 
2. Fill Output Buffec. —-->| 1. Reserve Space Via Storage 


Hanagemen 
3- Invoke ,8UF to gueve the 
Buffer to the TO-BE-SENT |<--—---->| 2. Queue Buffer into 
Queue. O-BE-SENT Queue. 


—~---| 4. Repeat step 1-3, until -~~--| 3. Post PNET Driver ECB, 
BOP is reached. | if Ist buffer in Queue. 
<-- 


1. If eggs uest and no 
24ND BE Lins get bfr 
from 70- B- due 


ue to th 
70-B-SHNT-ABBAD Queue, | peweennranare-------------—-- 
2. eh aaa ger komen > SEMD-MAMAGER (IPWSS$SR) 
ta: IPWSTOR, - tC“<—~‘“<‘< i CO ee CCS Ser ws 
1. prevent. gaterjocked SEND 
—-->} 2. Regus Est-ahirs, ouly. for 
eatiee only. 


3. Dequeus roa 
-S-i ius oft Queue and 


6- Execute SEND-HACRO =s===========> VTAA-APT 
Ve IWITIAL 
Je Check Return Code: €=-<<=- Completion 
any Brror, rervuve 
Buffer from Current and --| 2. PINAL 
ueue it to PNET Driver Completion 
uffer Queue. 


8. Return to Caller. \ Pe ee 


CO Wh mp au 
@ 
2s 
[as] 
wer 
ina 
Qo 
roy 
4 


1. Free RPL from VTAS, 
issue CHECK-MACRO #==s=<=2====== VTAM-APL | 


ze Take Buffer out froa }2----> CHECK 
Current an queues. 1t to 
the PHE? Draver Buffer Q. a a a a am cine 
3. Reset INTERLOC ZAG teat on 
4. Check Return Code nd 


If any Error or uN 
5. Invoke SEND-Manager to 
send another buffer 
6. Post PNET Driver ECB. 
7. Return to ACP/VTAB. geceass> 


5. Perforr status Changes, 
ifia phicabke 


6. Inv BUP to free keen -> BUPPER SGRuT __(1PuS$BS) 
output Buffer. caren ames was 
1. Pree Buffer and q queue it 
Jf Task Pree Output Chain. 


Figure 3-41. PNET SEND Function 


RECEIVE FUNCTION: The RECEIVE-Function checks the RECEIVE-Gate and returns to 
the caller with return code X'FF' in register 15 if the gate is already locked. 
Otherwise the gate is locked to prevent more than one RECEIVE being executed at 
a time. The FREE-INPUT AHEAD Queue is examined for a free buffer. If no buffer 
is available, the PNET Driver is informed by setting the 'RECEIVE-Request' in 
the NCB, the gate is opened and return is made to the caller. Input buffers may 
contain a pregenerated RPL which is modified when executing the RECEIVE macro. 
If no RPL is available, the pregenerated RPL of the SSCB is moved into the buff- 
er and modified when executing the RECEIVE macro. 


The initial return code is checked and if no error is indicated return is made 
to the caller. If the initial completion fails, the input buffer is chained to 
the PNET Driver buffer queue for further processing, the gate is unlocked, and 
return is made to the caller. 


The general flow is shown in Figure 3-42. 
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a free buffer and if one is available the RECEIVE-Function is called, from the 
exit, to start another RECEIVE. The gate remains locked until any error is 
detected or until no input buffer is available. In all cases, the PNET Driver 
task is posted to perform the required actions for the queued buffer. 


PNET Transmitter 


The PNET transmitter consists of two different transmitters, the job or output 
transmitter and the console transmitter. 


Job/Output Transmitter 


The PNET Transmitter is responsible for transmitting jobs or output to other 
nodes in the network. For each active transmitter there must be an active 
receiver on the other end of the line. Figure 3-43 . 
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1. Initially when the connection between the two nodes is established and 
sign-on processing completed, then one job and one output Transmitter are 
attached. 


2. When a job or output eligible for transmission is put into the XMT queue and 
the final destination is reachable via this connected node. 


3. When a PACT command is issued for the transmitter. 


4. When a job or output is returned to the XMT-queue with its original disposi- 
tion by means of the IPWSDQS HOLD macro. The transmitter going to be 
drained checks if there are other inactive transmitters of the same type and 
if so attaches one. 


5. When a connection between two nodes is broken, then the first inactive 
transmitter for an alternate route node is attached. 


Before attaching the transmitter the PNET Driver ensures that the connection is 
not drained (either done by PSTOP PNET,nodeid,EOJ or PEND command given by the 
central operator) and equips the transmitter with a workarea. 


When the job or output transmitter is initially entered, the workarea previously 
acquired by the PNET Driver is initialized. The IPWSNQS macro is then executed 
to obtain the next eligible queue set (job or output, dependent on the type of 
transmitter). The 'Get Next Queue Set' routine scans the XMT queue for a job or 
output which the transmitter can send and selects the oldest highest-priority 
job or output queue entry which is destined to, or routed via, the node which 
the transmitter is serving. 


A particular transmitter may be eligible to send to only a few of the nodes in 
the network. Eligibility is determined by the ‘Get Next Queue Set' routine, 
which determines the best path to reach any node. 


If the 'Get Next Queue Set’ routine returns to the transmitter without selecting 
a queue entry, the transmitter frees the storage area used as workspace, informs 
the PNET Driver about the termination and detaches itself. If however, a queue 
entry was selected, the transmitter initializes the Account record with the 
transmission start time, date and information extracted from the queue record. 
If the previous transmission of a job or output was aborted, the IPWSSTM macro 
is issued to allow the receiver on the other end of the line to do its cleanup 
processing before the next request for transmission (RIF) is sent. 


The Get Data record routine is invoked via macro IPWSGDR to obtain the first 
data record (the job header record). The Composer is called to generate a 
request for permission to transmit (RIF) and to schedule the buffer for trans- 
mission. 


If permission is not granted (the PNET driver has set the immediate stop code in 
the TCB on receipt of the negative permission) the transmitter informs the cen- 
tral operator via message 1RA9I and the IPWSDQS HOLD macro is issued to return 
the queue entry to the XMT Queue with its original disposition. 


The transmitter task entry table, contained in associated NCB, is scanned for 
any inactive transmitter of the same type. If found, the PNET Driver is posted 
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The Composer on behalf of the transmitter waits then for an acknowledgement (re- 
ceiver cancel from the other side). 


The cancel code is stored in the account record. The operator is informed via 
message 1RA9I, and in the case that the transmitter will also be drained, via 
message 1RA8I. The queue set is returned to the XMT queue with a disposition 
requested by the saved stop state. If the transmitter is to be drained, then the 
PNET driver is requested to start another not drained transmitter. If 
applicable, additional information is written into the account record. The log- 
ical data area and queue record area are then released. 


If the saved stop state does not require an immediate and unconditional termi- 
nation of the transmitter task, any subsequent transmission will start again 
from the beginning. 


Console Transmitter 


The Console transmitter associated with a node is responsible for sending mes- 
sages and commands, in the NMR format, to that node. The task is attached by 
the PNET Driver when a message/command is put in the message/command queue of 
the node concerned. 


When the Console transmitter is initially entered, the routine initializes the 
work area which was acquired by the PNET Driver. The IPWSICS REQ=GET macro is 
then issued to obtain the first message/command from the queue. The NMR is then 
passed to the Composer which converts the record into the form required for 
transmission, including compression and blocking. After passing the record, the 
storage area occupied by the NMR is released by means of the IPWSICS REQ=DEL 
macro instruction. 


This process continues until all messages/commands are scheduled for trans- 
mission. When the message/command queue is empty, the Composer is called to 
schedule the partially filled buffer for transmission. The Composer returns to 
the transmitter when the last buffer has been transmitted. If, meanwhile, 
another message/command was put into the queue associated with the node, the 
Console transmitter starts the whole process again. Otherwise the routine 
informs the PNET Driver about the termination and, after releasing all prior 
acquired workarea, detaches itself. 


PNET Composer 


The Composer runs under the control of the calling task and acts as a function 
module. It is responsible: 


* to set up an MLI control record (eg. RIF, PGR) and to schedule the record 
for transmission. 


° to prepare all records (eg. data records, nodal message records, job header 
records etc.), with the exception of topology records, in the format 
required for transmission. Framing the records with RCB and SRCB for BSC or 
RID for SNA respectively, compressing the record and blocking. 
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Normal Record (Not spanned) 


————“—___--—--- 
| RECL | CCTL* | Data | 


| 1 byte | 1 byte | | 
a a a a ee] 


Spanned Record 


_|<+++--- SEGL1------ >| | <-SEGL2->| 
| TRECL | SEGL | CCTL* | Data....| -------- | SEGL | Data....| 


| 2 bytes| 1 byte | 1 byte | | | 1 byte | © | 


RECL Length of data in unspanned record 

CCTL Command code 

TRECL Total data length of segmented record 
TRECL=SEGL1+SEGL2+..... SEGLn 

SEGL Length of data in segment 

ve means that this field is optional. 


Figure 3-44. Format of Output Records 


NETWORK CONTROL RECORD PROCESSING: Network control records are segmented into 
records with a maximum length of 256 bytes. Each segment is provided with a 
4-byte header containing a sequence count and a continuation indicator. The 
first segment of each network control record must be the first record in the 
output buffer. The buffer may then contain other records after the control 
record. 


MLI CONTROL RECORD PROCESSING: All MLI control records, with the exception of 
ABORT, are built in small output buffers of fixed length and of a size capable 
of holding any type of MLI record. The buffers are obtained by means of 


IPWSBUF MODE=OUT , TYPE=CNTRL 
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The Receiver calls the presentation service routine, which is responsible for 
obtaining physical buffers from the received input queve pertaining to the 
receiver, de-blocking and de-compressing each record and passing the logical 
record, on demand, to the receiver. 


The receiver is attached by the PNET Driver when the corresponding transmitter 
on the other end of the line requests permission to transmit by sending a 're- 
quest to initiate a function’ (RIF) control record. If, however, either 
VSE/POWER is in shutdown period or the node is to be terminated, the PNET Driver 
rejects that request by sending a negative permission (NPGR) control record. 


When the receiver is initially entered, the workarea already acquired by the 
PNET Driver is initialized. The receiver then checks if any termination code 
has been set in the TCB (for example the operator has drained the receiver) and 
if so, the receiver terminates by calling the composer in order to send a nega- 
tive permission to the corresponding transmitter. Otherwise the Composer is 
called to prepare a ‘permission granted’ (PGR) control record and to schedule 
the record for transmission. After the buffer has been successfully sent, the 
Composer returns to the receiver which then calls Presentation service in order 
to obtain the first logical record. 


If Presentation service returns with a bad return code, the receiver aborts the 
current data stream. Otherwise the record control byte (RCB) and sub-record 
control byte (SRCB) which are returned by presentation service, are checked to 
determine what type of record was received (job header, job trailer, data set 
header, end-of-file, abort, normal data record, or nodal message record). The 
layout of the RCB can be found in Figure 3-50 and that of the SRCB in 

Figure 3-51. 


The received record type is checked against the record type associated with the 
receiver; only records pertaining to the receiver and nodal message records are 
expected. If the received record was not expected, the receiver aborts the 
transmission. 


If a network user exit is present, any network control records (job header, job 
trailer and data set header) as well as any JECL and JCL statement are passed to 
the exit before the appropriate routine is called which handles the type of 
record that was received. If, however, the user exit indicates that deletion of 
the record is required, then the receiver branches to obtain the next record 
from presentation service. 


Note: Network Control records may not be deleted by the user exit. 
JOB HEADER RECORD PROCESSING: A job header record is expected only once per job 
and must be the first record received. If such a record is received in the mid- 


dle of a transmission, the receiver aborts the transmission. 


When a job header record is received, the receiver prepares to receive the 
job/output. 


e The IPWSRQS macro is issued to reserve a queue record and its associated 
datafile space. 
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record to the queue record. If a VSE/POWER section is present, the 3540 cuu 
address is also copied into the queue record and the TCB is flagged that now 
3540 data records follow. 


The JES2 output transmitter may send more than one data set header record before 
sending the data records. In this case, each data set header record may indicate 
a different destination for the same data set. The receiver splits each data 
set into multiple queue entries (data sets) - one for each destination. This 
means that when the data stream is transmitted again, it is sent as multiple 
streams, each containing the data set and each independant of the other. 


For every data set header record so received, a data set control block (DSCB) is 
built, including queue record allocation and reserving of data block space. The 
DSCB is placed in the active DSCB chain. Each subsequent data record is now 
spooled for each queue entry in the active DSCB chain. The DSCB contains all 
required spooling information for the queue and data-file. 


If another data set header record is received after data has been received, then 
the receiver suspends the spooling of all queue entries currently in the active 
DSCB chain by writing a NOP-record with the end of block indication and releas- 
ing the data block buffer afterwards. All data sets in the active DSCB chain 
are then placed in the suspended DSCB chain. 


The suspended DSCB chain is then scanned for a match with the new data set head- 
er record. A match is found when the output characteristics such as forms id, 
FCB, destination, etc. , the output class and priority are identical. 


If such a DSCB is found, which means that there already exists a incomplete 
queue entry which can be further used, the DSCB is removed from the suspended 
DSCB chain and put into the active DSCB chain. Additionally, buffer space for 
the data block is reserved and anchored to the DSCB. 


If no DSCB is found, a new DSCB is created and initialized with the information 
from the job header record and the just received data set header record. A new 
queue record is reserved by means of the IPWSRQS macro and storage for the data 
block is obtained. Both the queue record and the data block are anchored to the 
DSCB being built. The job header record and the data set header record are then 
written as first records on spool. 


DATA RECORD PROCESSING: When receiving a job, the record is written on spool by 
issuing the IPWSPDR macro. The account information is updated accordingly. 


When receiving print data, each ASA character is converted into machine control 
characters. When receiving punch data, each ASA character is converted into 
X'21' (write, feed, select stacker 1). The record, or in case of ASA conversion 
the 2 records, are spooled for each queve entry described by a DSCB entry in the 
active DSCB chain. The account record is updated accordingly. 


NODAL MESSAGE RECORD PROCESSING: The record is passed to the message distribu- 
tor for further processing by issuing the IPWSGMS TYPE=DIST macro instruction. 


JOB TRAILER RECORD PROCESSING: After all data has been transmitted, the trans- 


mitter sends the job trailer record. When the receiver receives the job trailer 
record it starts termination processing of the job or output. The job trailer is 
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When a receiver cancel record is sent, the receiver enters a data stream loop, 
waiting for an abort or end-of-file record from the transmitter. Each record 
received while in the this condition is purged, unless it is a nodal message 
record which is passed to the message distributor via the IPWSGMS TYPE=DIST mac- 
ro instruction. The purge loop is left when either the PNET Driver encounters a 
line error or a signoff record is sent or received. In this case the PNET Driver 
propagates the error condition to the receiver. Any workspace previously 
acquired, such as the job header record area or the alternate presentation buff- 
er area, are released and returned to the VSE/POWER storage pool. 


If applicable, message 1RA8I is issued to inform the operator that the receiver 
is now drained. Any buffer still in the receiver input buffer queue is released 
and its storage returned to the VSE/POWER storage pool. Finally the account 
record is completed with the transmission stop time and the account record is 
written by means of the IPWSPAR macro instruction. The cancel code is set to 
X'50'. The PNET Driver is informed that the receiver is going to be detached. 


PNET 1/O Manager 


The I/O Manager is responsible for issuing all I/O's for a PNET BSC line using 
the MLI line discipline. Whenever an I/O is to be initiated, the PNET Driver 
requests this by indicating the type of request in the node control block (NCB) 
addressed by R1. 


Depending on the request code a channel program is constructed in the node con- 
trol block and the I/O is started via a SVC 0. In addition the block control 
byte (BCB) sequence count is updated accordingly and the just sent buffer is 
completed with the current FCS bytes. No wait is performed after theSVCO 
andimmediate return is made to the caller. 


The request code consists of a main request (first four bits) and a sub request 


(last four bits). Figure 3-46 shows the various CCW sequences that can be built 
by the I/O Manager. 


3. Program Organization 3-113 


Licensed Material - Property of IBM 
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write text / empty buffer 

° write DLE ETB 

e read response / text 
The current status of the to-be-sent output queue is examined and 
depending on its condition either an empty buffer is sent, the next 
output buffer transmitted or an 1,5 second delay initiated. If a 
wait-a-bit was just received an empty buffer is sent to acknowledge 
the received input buffer. If a free input buffer is available or a 
new buffer can be obtained from the VSE/POWER storage pool this buff- 
er is used as input buffer and the READ CCW is updated accordingly. 
Otherwise, the PNET Driver input buffer is used and the wait-a-bit 
flag is set. 


X'20' NAK sequence 


bd write NAK 

° read response / text 
If a free input buffer is available or a new buffer can be obtained 
from the VSE/POWER storage pool this buffer is used as input buffer 
and the READ CCW is updated accordingly. Otherwise the PNET Driver 
input buffer is used. 


X'21' ACKO sequence 


¢ write ACKO 

° read response / text 
If a free input buffer is available or a new buffer can be obtained 
from the VSE/POWER storage pool, this buffer is used as input buffer 
and the READ CCW is updated. Otherwise the PNET Driver input buffer 


is used. 


Figure 3-46 (Part 2 of 2). Networking CCW Sequences 


PNET Presentation Service 


This routine is responsible for obtaining physical buffers from the ‘received 
input queue' and passing decompressed logical records one at a time to the 
receiver. The Presentation service routine runs as a function module under the 
TCB of the calling task. 


The logical record is decompressed in the presentation buffer, which has the 
same size as a data buffer (DBLK) and is appended to the Presentation service 
workarea passed by the caller. The decompression routine in the IPWSSNK module 
is used for the decompression of the records. 


ForSNA,eachdatarecordorsegment in the buffer (RU) is preceded by a 3 byte record 
identifier (RID) appended to the record during compression at the transmitting 
node. The RID identifies the type of record and contains the length of the 
decompressed data record. Since the RID has undergone compression at the trans- 
mitting node, it must go through decompression at the receiving node. Thus the 
decompression routine is called to decompress a RID into a 3-byte workarea in 


3. Program Organization 3-115 


Licensed Material - Property of IBM 


byes in length) for transmission. If the header/trailer record occupies more 
than one logical record, the presentation service routine rebuilds the entire 
header/trailer before passing it to the receiver. As each piece is received its 
sequence number is verified and if an error is encountered a return code is 
passed to the caller. 


Additionally, the general section is checked for the minimum required length. If 
the section is too short, the routine expands it to the required length by mov- 
ing down any data following the general section and padding the section with 
binary zeros. If the section is expanded, both the overall length and the sec- 
tion length are updated. This is necessary, because the general section may be 
enlarged from one release to another and not all nodes within a network may have 
the same release level. 


If normal or abnormal end-of-file is received, appropriate flags are set in the 
TCB of the calling receiver and immediate return to the caller is made. 


If the buffer is processed (all logical records have been passed to the 
receiver), the buffer is returned to the free input queue by issuing the IPWSBUF 
MODE=IN,TYPE=FREE macro instruction. 


PNET Buffer Service 


This routine is responsible for queueing all incoming buffers to the 'received 
input queue', to queue all outgoing buffers in the 'to-be-sent queue’, and to 
supply buffers for both the transmitters and receivers. The buffer service rou- 
tine runs under control of the calling task and acts as a function module. The 
routine is called by means of the IPWSBUF macro instruction. 


The buffers required to process BSC nodes are provided from real storage, while 
those required to process SNA nodes are provided from virtual storage (GETVIS). 


For a detail description of the functions provided, see Appendix D, "Format of 
Internal Macros" -"IPWSBUF - PNET Buffer Management" on page D-1. 


PNET Compression/Decompression 


The PNET compression function is used to condense duplicate character strings to 
reduce tele-processing transmission volume and thus transmission time. In the 
case of three or more duplicate non-blank characters, the string is replaced 
with two bytes: a ‘String Control Byte’ (SCB) followed by the character itself. 
Two or more duplicate blank (X'40') characters require only the SCB indicating 
the character string length. Strings of non-duplicate characters are also 
preceeded by a SCB to indicate the length. The decompression function uses the 
SCB's to reconstruct the original data. 


The SCB's and the method of compression/decompression differ according to the 
caller's indicated TP line discipline (BSC or SNA). For compressed BSC data 

only, each record ends with a special end-of-record SCB. Therefore BSC com- 

pression appends this SCB to each compressed data string offered as input. 
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The basic element for multi-leaving transmission is the character string. One or 
more character strings are formed from the smallest external element of trans- 
mission - the logical record. For efficiency in transmission, each record is 
reduced to a series of character strings of two basic types: 


a variable length non-identical series of characters 
e a variable number of identical charaters ; 


Because of the frequent occurrence of blank characters, a special case is made 
for identical characters when the duplication character is a blank. A 1 byte 
control field, called a string control byte (SCB), precedes each character 
string to identify the type and length of the string. Thus a string of noniden- 
tical characters is represented by an SCB followed by the nonduplicate charac- 
ters. A string of consecutive, duplicate, nonblank characters is represented by 
an SCB and a single character. The SCB indicates the duplication count and the 
character following indicates the character to be duplicated. In the case of an 
all-blank character string, only an SCB is required to indicate both the type 
and number of blank characters. Figure 3-49 describes the supported SCB's. 

ar aa ee eye Sg en me ge cae ee gy a we Se oe ee ee eed 

| Binary |Meaning | 

| 0000 0000 -~=sw | Endd-o f- record | | 

|If first SCB, this also indicates end-of-file | 

| 0100 0000 + |Abort transmission | 

| 100b bbbb  |"bbbbb" blanks are to be inserted | 

| 101d dddd |The single character following this SCB is to be | 

| |duplicated "ddddd" times | 

| llec cece |The “cccccc"™ characters following this SCB are to | 

| 


|be inserted 
a a ee 


Figure 3-49. String Control Byte (SCB) 


A data record to be transmitted is therefore segmented by the transmitting pro- 

gram into the optimum number of characters to take full advantage of the identi- 
cal character compression. A special SCB is utilized to indicate the grouping of 
character strings which compose the original logical record. The receiving pro- 

gram can then re-construct the original record for processing. 


In order to group logical records together in a single transmission block, an 
additional 1-byte control field precedes the group of character strings repres- 
enting the original logical record. This field, the record control byte (RCB), 
identifies the general type and function of the logical record (input stream, 
print stream). A particular RCB type has been designated to pass control infor- 
mation between the various systems. To provide for simultaneous transmission of 
similar functions (such as multiple input streams), a stream indentification 
code is included in the RCB. Figure 3-50 shows the various supported RCB's. 
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| RCB | SRCB | | 
Jp 
| 00 _ |None | 
| 80 |RCB of job/output stream to be held or | 
| |X'FF' for all streams to be held | 
| 90° |RCB of function to be initiated | 
| AO |RCB of function to be initiated | 
| BO |RCB of function to be cancelled | 
| co |RCB of function which is complete | 
| DO |RCB of job/output stream to be released | 
| |X'FF' for all streams to be released | 
| EO |Expected count (received count is in BCB) | 
| FO |An identification character as follows: | 
| | A= Initial RJE SIGN-ON | 
| | B= Final RJE SIGN-OFF | 
| | C = Print initialization record | 
| | D = Punch initialization record | 
| | E = Input initialization record | 
| | F = Data set transmission initialization | 
| G = System configuration status 
| 
| | H = Diagnostic control record | 
| I = Initial network SIGN-ON 
| 
| | J = Response to initial network SIGN-ON | 
| | K = Reset network SIGN-ON | 
| | L = Accept (concurrence) network SIGN-ON | 
| | M = Add network connection | 
| | N = Delete network connection | 
| | O-Z = Reserved for future use | 
| 91 |1000 0000 (X'80') | 
| 92 11000 0000 (X'80') | 
| 93-F3 |1000 0000 (X'80') | 
- arriage control information as follows: 
| 94-F4 |Carri 1 inf i foll | 
| | 1010 00nn - Space immediately "nn" spaces | 
| | 1011 ccce - Skip immediately to channel "cccc" | 
| | 1000 00Onn - Space "nn" lines after print | 
- Load printer image 
| | 1000 1100 - Load pri FCB i | 
ccce. = ip to channe cccce after print 
| | 1001 Ski h ieee Wat i | 
| | 1000 0000 - Print and suppress space | 
| 95-F5 {1000 1111 (X'8F') | 
| 96-F6 | Undefined | 
| 97-F7 |Undefined | 


Figure 3-51 (Part 1 of 2). Sub-Record Control Byte (SRCB) 
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RS RS) aA A a a Re GE 


| Binary | Meaning | 
J 
Peek wv, Base. oes Reserved (must be 1... .... 1... ....) 
Oe: Normal state 


| | | 
| | | 
a ee | Suspend all stream transmission | 
CS 3 a ames: cee on Reserved for future use | 
| | Remote console stream identifier | 
| | Function stream identifier for: | 
| | NJE job transmission stream number 1 | 


i? eet wieke, mage «ie cte | Function stream identifier for: | 
| | NJE job transmission stream number 2 | 
| | | NJE SYSOUT transmission stream number 7 | 


[i sogheisamaibar, «sede, new Function stream identifier for: | 
| | NJE job transmission stream number 3 | 
| | NJE SYSOUT transmission stream number 6 | 


Is Schein eee, zeigt oaaauell Function stream identifier for: 
| | NJE job transmission stream number 4 | 
| | NJE SYSOUT transmission stream number 5 | 


| Rie hee, wieder | Function stream identifier for: | 
| | NJE job transmission stream number 5 | 
| | NJE SYSOUT transmission stream number 4 | 


dit, Seeeaet OEE eee. ated Function stream identifier for: | 
| | NJE job transmission stream number 6 | 
| | NJE SYSOUT transmission stream number 3 | 


[ teu aus alec Function stream identifier for: | 
| | NJE job transmission stream number 7 | 
| | NJE SYSOUT transmission stream number 2 | 


b seeha- getienk “Spatace here Function stream identifier for: | 
| | NJE SYSOUT transmission stream number 1 | 
Le a a ee 


Figure 3-52. Function Control Sequence (FCS) 


For error detection and correction purposes, a block control byte (BCB) is added 
as first character of each block transmitted. The BCB, in addition to control 
information, contains a modulo 16 block sequence count. This count is maintained 
and verified by both the sending and receiving systems to prevent lost or dupli- 
cated transmission blocks. The layout of the BCB can be found in Figure 3-53. 
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An RU consists of as many logical record identifiers and corresponding logical 
records as will fit in the specified RU size as specified by the BUFSZ 
parameter. No logical record may be larger than 256 bytes plus 3 bytes for the 
record identifier(RID). PNET sends only one type of record (network topology, 
stream control or data record) within a SNA RU. PNET compresses an entire RU, 
i.e. everything from the beginning to the end of the RU, without regard to 
record identifiers. 


| DLE |BSC Control Character | 
| STX |BSC Control Character | 
| BCB |Block Control Byte | 
| FCS |Function Control Sequence | 
| FCs |Function Control Sequence (Continued) | 
| RCB [Record Control Byte for Record 1 | 


| SRCB |Sub-Record Control Byte for Record 1 | 


| SCB |String Control Byte for Record 1 | 
| data |Character string | 
| SCB |String Control Byte for Record 1 | 
| data |Character string | 
| SCB |Terminating SCB for Record 1 (end-of-record) | 
| RCB |Record Control Byte for Record 2 | 


| SRCB |Sub-Record Control Byte for Record 2 | 


| SCB {String Control Byte for Record 2 | 
| | | | 
| | | 
| SCB |Terminating SCB for last record | 
| RCB |Transmission Block Terminator (end-of-block) | 
| DLE |BSC Control Character | | 
| ETB |BSC Control Character | 


Da a a ge at 


Figure 3-55. Multi-Leaving Buffer Format for BSC 
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Buffer Belationship and Queueing 
BECELYED-QOBOE 


SUDE=18, e TYPE=GkT Ba C =sesoe= 7 - BUD == 18 , TYP a=Q 
retrieved by | Leceiver atatateimnmnetoanns esc e queued by line-driver 


v PEE INPUT QUBUB 
ceesecceses SODE=1N, TYPS=PREE —------------- | won----= 7 wan nn === 
sRSCEIV ER §ssscsosez== 2S =====yp NCBIFRS perra[ —----—> } wow ane 


v 


eesescerecn 


i 
zs Betwork : Secreta aid PI oS Rees LDa-TCos 
? Banager :  =*====ss=ess===2=> NCBIBOP = | -------- of | uaneses es 


cece eccccce Steere =sSSn= teSrse == Meg ches by ix te : "3 
anne]-End- ry 3 3 
| in Nucleus iene : buffer 3: 
SES ee ee ee ee >s QUeue somo 
Soa—se- so rs Tail-Ptr TU-BB-SBNT-QUBUE se secconce : 
:Liwe DRIVER: _NODB=0UT, TYPB=9 eee a ee ee 
3 2 P = iaeeepattetabehelanala sealant ae aioe 
SPRANSHITTER ; ==SSsEsecseeceacsosss NCBOTBS =— | -------- > -e---> <-- 
¢ BBCBIVER 2 2 2 4 42424242 Jew enaenanan- ete ‘eee 


2 "wetvork : 
3 Samager ; 


“__BCBOBUP neaaa 4 | ze 
Date ee tee eee aie ee Se eG eee ee 
after chapnel-end processed by 3 Draver : 
SCHORR OT pakbettencen 8 7 eoeeccccce 


Pe OS OS ae a De ee Oe eS ae a ee Qkeoe ee one ee ee ee eee, 


BUDB=OUT, eTYPB=GET CTL meee ll eee BODE=v0T TY PE=PFREB | 
a Pai Mant <------=-------[7 ~]e---=-- Te 


) Figure 3-57. PNET BSC Buffer Relationship and Queueing 
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BOPPER. RELATLOBSHEP AND OUBUEIEG 
RECEIV &) 0 RUE 
SODB=IN, TY PE=GET pl hi % a A occ et eo BODE=IN,TIPZeQ 
a | 
“ieorarag—|-------- oo CD nt 
pespouse at bee but camBot pve served, 
because of Storage Shortage. 
v 
specereen : PIM, TIPE*=PRERO Fee orsroroserrnn| 0.0.0...) preteens poworworrec=. BE 
2RECBIVER pent ial EL LL i S| UCBIPRE Pare __|-----> _ _] Tees 
orererere ne ~= soatemeeteten a cetera MECELV 
Spach P| eons __NCBIPRBX Semmes i aon ABEAD-Q 
RECBIVE-Manager 0 J eter eee aera ome ‘ 
aby aucazt Be APD aes: cee re eee 
ggtses ov wrcueectenace., | ~aasingy | ——— CRE eesti y_ [LS 
RECBIVE-8 rs § Receive Agr i ress, 3 a rs 
@eaeeeeoeeaeeotes = ee ee 
2-----------—- Taal-Ptr TU-BE-SENT wat== } 
:808T Driver: sODK-OUT, TYP EQ aomeee i ae 
igranseitter ;=sesasseasshesess=esn=> wCBOTBS > jf <-- 
sReceiver : wen w ene ne anne - eemtemtes 
' ere rtenn sano n= ; _fail-Ptr TU-BB-SBNP- ABAD 
dated by LDR aiceeeeeeetS lg. open a | 
9 } sdezasesneenees==) wCBOTBSX | —---~~-> J £ <-- 
SE¥D-Hanager a oon ae- a 
4 
9 dated by oeaD-Hanager  sceteatleenmatetntateanated “comme Queved to LDR Ber Queue 
Zeecxz=> | jJCBOBUP £3 #£[| @w"ce--=— > ae a Cree REE OOPS ence ae Oa a a a etme 
SEWD-EXIT eeewe eects ee | by Send-Manager or Sead gExit 
bee nme own nemo =a. 
OUTPUT QUEOR 
aoDRq00r, TYPE=GET . OY nee ene AUDRSOUT, FEPESP HAE 
- nnn BODECOUT/TYPESCHTAG iat 5: DA TEE TO ee Ce ORE 
Storage 
Figure 3-59. PNET SNA Buffer Relationship and Queueing 
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LCB Scanning: 


CAT 





Channel End Processing: 


TCB (LM) 


LCB LCB 
HOBNEXT iOBNEXT 





Figure 3-61. LCB Activity Checking and Channel End Processing 


When a line start request is detected during LCB activity checking, two initial 


CCW chains are set up. 


e Leased line - DISABLE 
- SET MODE 
- ENABLE 
- PREP 
- READ 


¢ Switched line - DISABLE 
- SET MODE 
- ENABLE 
- NOP 
- READ 
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state until it is posted by the line manager when the first block has been 
received. The data records are deblocked and expanded. An RJE,BSC command, 
read at job boundary is either processed by the RJE,BSC command processor rou- 
tine or a temporary command processor is attached. Logical data records are 
passed to the logical reader. After the last record of the buffer received has 
been processed, the buffer will be made available to the line. If no software 
EOJ or hardware EOT has been read in the meantime, the task will wait for it. 
The next received block will be processed like the first one. After EOT on job 
boundary, the task detaches itself. If EOT is not detected on job boundary the 
task puts itself in the BSC wait state, waiting for real end of job. 


RJE,BSC reader flow is illustrated in Figure 3-63 
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transmitted, the BSC writer task is called as a message task and no logical 
interface is opened. 


If there is list or punch output to be transmitted, the logical interface to the 
logical writer is opened. Either logical data records from the logical writer or 
messages from the remote message queue are obtained and are grouped into phys- 
ical data groups. 


After being grouped, the data is written out to the terminal by the BSC I/O Mon- 
itor at the time the next I/O operation is performed. At end of job the logical 
writer is again called to delete the queue set from the queue according to its 
disposition. If no line turnaround after EOJ is specified, the task obtains the 
next queue set records from the logical writer, if there are any, and continues 
transmission until all queue sets have been transmitted. 


At the end of a queue set, the writer task indicates that an EOT has to be sent 
by the line manager after the last buffer has been sent. 


When a forms change is required, the RJE,BSC writer task puts itself in the 
inactive state (IPWSWFO) awaiting remote operator response (SETUP or GO command) 
after the forms mount message is successfully transmitted to the remote station 
via a separate message task. 


A BSC writer task detaches itself either at the end of a queue set, or when all 
queue sets of the specified class(es) have been transmitted. 


RJE,BSC writer flow is illustrated in Figure 3-64. 
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Manager requests this by indicating the type of activity in the line control 
block and linking to the I/O Monitor. 


On entrance, the request code being set is analyzed by dividing it into main and 
subrequest. The request code used to start I/O operations via SVC 0 is divided 
into the following categories: 


Line preparation and initiation 

Line turnaround from read to write mode and vice versa 
Read sequence 

Abnormal requests 

Write sequence 

Read only requests. 

Retry. 


If the analysis results in a valid subrequest, the channel command words used to 
fulfill the request are created in the related line control block (LCB) and the 
I/O operation is started via SVC 0. 


No WAIT is performed after SVC 0. Control is given back to the Line Manager 
immediately, which waits for I/0 completion or processes asynchronous line 
activities. 


The RJE,BSC I/O Monitor runs under control of the caller's TCB acting as a func- 
tion module. 


| RJE,SNA 


VSE/POWER RJE,SNA provides support for the SNA terminals that use Synchronous 
Data Link Control (SDLC). The communication with the SNA logical units is 
accomplished by using the VTAM access method. VSE/POWER controls the SNA work 
stations through a logical connection. All physical connections within the log- 
ical path are controlled by VTAM and NCP. Since VTAM does some of its process- 
ing under the TIK of the VSE/Advanced Functions application task, the 
VSE/Advanced Functions supervisor handles VTAM page faults as if they were 
VSE/POWER page faults. In order to minimize the effect of these page faults on 

non-RJE tasks, VSE/POWER attaches a VSE/Advanced Functions subtask under whose 
PIB VTAM processing can be executed. 


The VSE/POWER RJE,SNA operations are performed by the following phases: 


IPWSSSN (SNA manager) 

IPWSSLH (SNA logon processor 1) 

IPWSSLN (SNA logon processor 2) 

IPWSSIB (SNA inbound processor) 

IPWSSOB (SNA outbound processor) 

IPWSSOC (SNA outbound compaction manager) 
IPWSSMP (SNA message processor) 

IPWSSLF (SNA logoff processor) 

IPWSSVE (VTAM exit routines) 


; Figure 3-65 shows the VSE/POWER RJE,SNA interrelationship. 
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any inbound or outbound process related to a work station and its associated 
sessions. The SNA manager attaches a VSE/Advanced Functions subtask to the 
VSE/POWER maintask in which the VSE/POWER application opens the interface with 
the VTAM access method by issuing the OPEN ACB macro. The ACB points to an 
EXLST control block, which defines the asynchronous exit structure within the 
VSE/POWER system to VTAM and consists of LOGON, LOSTERM, TPEND and DFASY exits. 
After the interface to VTAM is opened any logon request to VSE/POWER will be 
queued by VITAM. After the OPEN ACB request has been completed successfully 
VSE/POWER issues a SETLOGON START macro to enable VTAM to schedule the VSE/POWER 
LOGON exit routine. 


Logon Processing 


VTAM schedules the LOGON exit when a LOGON command is received from a logical 
unit. The LOGON exit routine queues the request with the LOGMODE table entry 
address. 


In a Multiple Logical Unit (MLU) environment, VTAM and NCP do not associate ses- 
sions within a work station concept. VTAM and NCP only see individual sessions 
between VSE/POWER and the physical terminals. Hence, VSE/POWER is responsible 
for associating sessions with work stations according to the DATA operand of the 
LOGON command. 


The first LOGON routine (IPWS$SLH) in VSE/POWER processes all LOGON requests in 
the LOGON queue. For each LOGON request the routine performs the following 
functions: 


° Utilizing LOGMODE table entry address and a LOGON work area, it requests the 
user DATA and BIND parameters from VTAM issuing the INQUIRE SESSPARM macro. 


. It performs syntax checking of the REMID and verifies its existence as spec- 
ified in the PRMT macro. 


° It checks the corresponding password if specified. 


e It moves the 16 bytes of user information of the data into the session 
account record without validity checking. 


° It verifies that the logical unit is authorized to log on with this REMID, 
provided that an LU=(name,...) parameter has been specified in the PRMT 
macro. 


: It validates the BIND parameters. 


In turn, the IPWSSLH routine checks whether or not any logical unit has been 
logged on with the same REMID. If no logical unit has as yet logged on with the 
same REMID, i.e., this work station is logging on its first session, the routine 
initializes all relevant work station and session related control blocks for 
this REMID. 


If any logical unit has already logged on with the same REMID the routine veri- 
fies that this current LOGON request does not exceed the SESSLIM according to 
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° Ignored parameter (I) 

od Enforced parameter (E) 
° Mandatory parameter (M) 
¢ Variable parameter (V). 


Ignored parameters are neither tested nor modified by VSE/POWER. Enforced 
parameters are dictated by VSE/POWER on the secondary logical unit. Mandatory 
| parameters are tested, and if incorrect, the logon request is rejected. The 
| variable parameters are copied and affect processing. For a coding example, 


| refer to Appendix A in the VSE/POWER Remote Job Entry User's Guide , which 


describes LOGON Mode Table and BIND parameter requirements. 


[Byte |Bits  |Content |Description | 
lo lo-7.-—«|x'31' = ~—s« | BIND RU code | 
[1 |o-3 |B'0000' |Format: O (M) | 
| | |4-7 |B'0001' -|[Bind type non-negotiable. (E) | 
\2 | |x'03' |FM profile 3. (M) | 
ee 
|3 | |x'o3' ITS profile 3. (M) | 


|Primary NAU Protocol | 


| 4 Ke) ({B‘1' |Multiple RU per chain. (M) | 

| | [1 |B'O' |Immediate response mode. (M) | 

} | |2-3 |B'10' |Definite response chains. (M) | 
| [4-5 |B‘oo' |Reserved. (E) | 

| 16 |B'O'|B'1' |Compression may not be | may be used. (V) | 

| |7 [B'1' |Primary may send EB. (M) | 


|Secondary NAU. Protocol | 


[5 10 |B'1' |Multiple RU per chain. (I) | 

| | [1 |B'O' |Immediate response mode. (M) | 

| |2-3 |B'10' |Definite response chains. (M) | 

| [4-5 |B'00' |Reserved. (E) | 
| |6 |B‘'O' {Compression may not be used. (E) | 

| |7 |B'1' |Secondary may send EB. (M) | 


{Common LU Protocol | 


|6 10 |B'o' |Reserved. (E) | 
| 11 [B'1' |FM headers may be used. (M) | 
| | |2 |B‘ 1' |Brackets are used for RLU and SLU. (M) | 
| 13 B'1' |Bracket termination rule 1. (M) | 
| 14 iB'O'|B'1' |Alternate code may not be used | may be | 
| | |used (ASCII). (V) | 
| [5-7 |B'000' |Reserved. (E) | 


) Figure 3-66 (Part 1 of 3). BIND Format 
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|Byte 
18 10 


| 
| 
| |2 
| 
| 
| 


19 | 


20 0 


any 


& W Pb 


</ 


|Bits 


| Content 


|x'00' 


IB'o'|B'1' 


|Description 


|BS, CR, INP, ENP, LF, HT, VT allowed. (M) 


|SHF allowed. (M) 

|SVF allowed. (M) 
|SVF, SEL allowed. (M) 
|Reserved. (E) 

|TRN, IRS allowed. (M) 


|Reserved. (E) 


[Document output not allowed | allowed. 


|(V, default = B'1') 


|Card format not allowed | allowed. 


|(V, default = B'1') 


[Exchange media not allowed. (E) 
|Disk, data management not allowed. (E) 


|Reserved. (E) 


|SLU Usage Indication (Inbound) 


|21 | 

| [1 

| [2 

| |3-7 
| 22 | 
|23 10 

| | 

| [1 

| [2 

| [3 

| 14-6 
| [7 

| 24 | 
|25 10: 

| [1 

| | 2 

| |3 

| [4-7 
| 26 | 
Figure 


[B'O' 
|B'O' 
[B'o' 
|B'o0o000' 


|Interrupt (number of levels). (E) 


|No compaction. (E) 
|No PDIR. (E) 
|Reserved. (E) 


|Reserved. (E) 


|BS, CR, INP, ENP, LF, HT, VT not allowed. 


| (E) 
|SHF not allowed. (E) 
|SVF not allowed. (E) 


|SVF, SEL not allowed. (E) 


|Reserved. (E) 


|TRN, IRS allowed. (I, default = B'1') 


|Reserved. (E) 


|Document output not allowed. (E) 

[Card fmt allowed | not alld. (V,def.=B'1') 
|Exchange media not allowed | allowed (V) 
|Disk, data management not allowed. (E) 


|Reserved. (E) 


|Reserved. (E) 


3-66 (Part 3 of 3). BIND Format 
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[op a ee a ee eas re es op a ee 
|Byte |Bit|Name | Content |Description | 
lO |o-7| |x'06' |Length of FMH1 | 
[1 |o |FMHC |B‘'O' |Concatenation not supported | 
| |1-7|TYPE |B'0000001' |Type 1 FMH | 
$$ __t- 
2 0 |DEMAND | 
| SELECT IB'O' | Ignored 
1-3|MEDIA |B'000' | CONSOLE 
{B'oo1' |EXCHANGE MEDIA (only inbound) 
|B'o11' | PRINT 


|All other codes not supported. 
X'0' |1lst logical device 

x4" |2nd logical device for print 
xo |3rd logical device data only 


| 
| 
| 
| 
| 
| 
| 
| 
| ADDRESS 


| | 
| | 
| | 
| | 
| {B'010' | CARD | 
| | 
| | 
| | 
| | 
| | 


| 
| 
| 
4-7| LOGICAL 
| 
| 


3 QO |STACKREF 


| | 
ae | 
| | | 
|1-7| | 


{Stack reference indicator 
|Refers to DS begun by sender 
|Refers to DS begun by receiver 
000000‘ |Reserved 


Or © 


| 
| 
| 
| 1-7 
4 | PROPERTY 
e Note) |DS selection 

: |Basic exchange not supported 
|Basic exchange supported 

| (inbound only) 

|Reserved 

|No compression 

|Compression (outbound print only) 
|No compaction 

{Compaction (outbound print only) 
| Reserved 


a2 
3 |DST 


wi 


CMI 


aN 


CPI 


7 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


[5 |0-7|ERCL |X'0O' |Basic exchange record length must | 
| | | | [be <= 128 


6-n | | | |DSNAME which is defined by archi- | 


| 
| | | | [tecture in bytes 6-n is not | 
| | | | {supported by VSE/POWER. | 


Figure 3-67. FMH1 Format 


Note: The data stream selection bits are used in combination. The valid combi- 
nations are: 


B'000' - Resume suspended data stream (RDS) 
B'001' - End current data stream (EDS) 
B'010' - Begin data stream (BDS) 
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FUNCTION MANAGEMENT HEADER TYPE 2 (FMH2) : The FMH2 represents the peripheral 
data set information record (PDIR). It carries information relative to the des- 
tination selected by FMH1. VSE/POWER only supports FMH2 outbound, but not 
inbound. 


The format of the FMH2 is shown in Figure 3-69. 


[Pp toes he os fo ee See ig eS ae ys eee ee ee ee 
[Byte |Bit|Name |Content |Description | 
| 0 |0-7|Length [x'44' |Length of FMH2 | 
[1 10 |FMHC |B‘o' |No concatenation | 
| [1 | | |Reserved | 
- type 
| | 2-7 | TYPE 1B'000010' | FMH 2 | 
|2 |  |CODE Ix'o1' | PDIR | 
|3 |0-7|Identif. |x'00' |Ordinary data set | 
[4-11 | | DATE |MM/DD/YY |Date of queue set creation in the | 
| | | 


| | | form MM/DD/YY. 


}12-19 | | TIME |HH.MM.SS |Time of queue set creation in the | 
| | | | | form HH.MM.SS. 


|C'ccecbbbb'|Forms name in the form C'ccccbbbb' | 
| |Default is all blanks. The forms | 
| |can be provided by the * $$ LST | 
| |FNO= parameter, by the LFCB macro, | 
| lor by the SEGMENT macro, JECL= | 
| |operand, where a * $$ LST FNO= | 
| lis specified. | 


|C'cececccecc'|FCB name (1-8 characters)in the | 
| |form C'ccccccce' left justified. | 
| |Default is all blanks. The FCB | 
| |can be provided by the * $$ LST | 
| |FCB= parameter, by the LFCB macro, | 
| lor by the SEGMENT macro, JECL= | 
| loperand, where a * $$ LST FCB= | 
| lis specified. | 


[36-43 | | TRAIN |C'bbbbbbbb'|Not supported | 
ec a a a ee | 


Figure 3-69 (Part 1 of 2). FMH2 Format 
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eee ee ee ae ee ee oe ee ee ee me ee ag ee ge ene 
|Byte |Bit|Name | Content |Description | 
|0 |O-7| length | (See Note) |Length of FMH3 | 
|1 10 |FMHC |B‘o' |No concatenation | 
|1 |1 |Reserved | | | 
I | 2-7| TYPE |B'000011' |Type 3 FMH | 
|2 |O-7|FUNCTION |X'02' |Compaction table | 
13 |O0-7|MASTER NO |3-16 |No. of master characters | 
|4-n | | TABLE |(See Note) |Compaction table characters | 


Figure 3-70. FMH3 Format 


Note: Length is dependent on length of the compaction table. It can be calcu- 
lated by: 


length = 4 + 256 - (m x m) for m < 16 
length = 4 + 16 for m = 16 


where m is the number of master characters. 
The FMH3 including length indication is generated by the PCPTAB macro. 


An FMH3 is sent to the secondary logical unit whenever a job is to be transmit- 
ted outbound in compacted form using a compaction table other than the one cur- 
rently valid for the session. The FMH3 is always sent as only-chain, without 
data, and between DS state. The FMH3 RU may or may not indicate begin bracket 
depending on whether or not the session is already in bracket state. 


Initiation of Data Processing 


DATA INBOUND PROCESSING.: An inbound processor task is attached for a given 
session by the SNA manager in the following cases: 


. A VTAM RECEIVE ANY is satisfied: The SNA manager determines the session on 
which an inbound flow is to be expected by means of a pointer in the user 
field of the RPL. It then attaches an inbound processor, and reissues 
RECEIVE ANY to allow input from other sessions to be accepted. 


° An inbound flow is interrupted for an inbound message: The inbound processor 
being interrupted posts the SNA manager which attaches a second inbound 
processor for this session. 


° An outbound flow is interrupted for an inbound flow or message: The outbound 
processor being interrupted posts the SNA manager which attaches an inbound 
processor for this session and reissues RECEIVE ANY. 


In all three cases the inbound processor issues RECEIVE SPECIFIC. It verifies 


whether or not the device (RDR1 or console) selected by FMH1 (implicitly or 
explicitly) is already in use. If in use it rejects the inbound flow. 
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The outbound processor forces the termination of the current chain, sends an 
FMH1 with suspend DS to the logical unit, and posts the SNA manager which 
attaches the message processor. 


INTERRUPTION OF DATA INBOUND : Interruption of an inbound processor receiving 
card data is accepted anytime when the logical unit has a message to send. 


The interruption must be indicated to the inbound processor by an inbound FMH1 
with suspend DS. The suspended inbound processor will then post the SNA manager 
which will attach a second inbound processor to receive messages. These mes- 
sages are treated as commands. Upon reception of an FMH1 with resume DS, the 
interrupting inbound processor will detach, the suspended inbound processor will 
resume the DS, and normal inbound flow can continue. 


Inbound interruptions for outbound data are not supported. 


Protocols 


Half-duplex, flip-flop mode protocols are employed. Only one data stream at a 
time is allowed per session and contention is resolved by the use of SNA brack- 
ets. 


Termination 


SESSION TERMINATION: The termination of a session is requested by the remote 
operator either by issuing the LOGOFF request through VTAM, or by submitting a 
SIGNOFF command (from card or via the console) in the inbound data flow. The 
LOGOFF request may be an unconditional LOGOFF in which VTAM breaks the session 
and notifies VSE/POWER through the LOSTERM exit. If the remote operator issues 
a conditional LOGOFF VTAM notifies VSE/POWER also through the LOSTERM exit, but 
VTAM does not break the session. The SIGNOFF command is passed via the normal 
inbound data stream directly to VSE/POWER where it is handled as a conditional 
LOGOFF request for all sessions of a given work station. 


The work station may log off any individual session within the MLU concept. The 
LOGOFF may be conditional or unconditional. The SIGNOFF command causes LOGOFF 
of all sessions of the work station conditionally. 


VSE/POWER handles the unconditional LOGOFF as an emergency stop which means that 
the termination routines are entered without checking any internal job boundary 
state. In this case the current reader job entry will not be added to the 
queue. The conditional LOGOFF will be interpreted as a request for an orderly 
deactivation of the current session. In this case the termination routines will 
be entered only at job boundaries, that is, when processing of the current job 
entry is completed. 


After the active processors have been terminated, either normally or abnormally, 
the SNA manager activates the LOGOFF processor which sends a message to the work 
station and finally issues a CLSDST to terminate the session. In an MLU envi- 
ronment a SIGNOFF causes termination session-by- session at job boundary times. 
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[Routine |Called/ |Returns to |Function or Notes 


| Attached by| | 


|IPWSSIB | IPWSSSN | 

|Inbound | | 

{Processor | | 

| | | | IPWSSLR. 
| | | | 

| | | 

| | | |¢ START 
| | | |* STOP 
| | | |* FLUSH 
| | | |° RESTART 
| | | |¢ SETUP 
| | | |* GO 

| | | |¢ SIGNOFF 
| | | 

| | | 

| | | 

| | | 

| | | 

| | | 

| | | 

| IPWSSLF | IPWSSSN 

| Logoff | 

{Processor | | 

| | 

| | 

| | 

| | 

| IPWSSLH IPWSSSN 

{Logon Pro- 

|cessor 1 


| 
| 
| 
| 
| 
| | 
| 
| 
| 


IPWSSNU |Issues RECEIVE Specific request to 
|VTAM to receive data and then de- 
|blocks the data for spooling by 


|Processes remote operator commands: 


|and transfers all other commands to 
|IPWSSCM for processing. 
| 


|Posts the outbound processor 
|command following GO, or RESTART 
|when intervention is required. 
|Posts the SNA manager and detaches. 


| 

| | 
| 

| |Checks LOGON request and LU BIND 
| |parameters for validity. 
| 

| | 
| 


|Sets an indicator for IPWS$$SN to 
|attach logon processor No. 2 
|Posts the SNA manager and detaches. 


IPWSSNU |Logs off a logical unit using the | 
|VTAM macros SESSIONC and CLSDST. | 
| 


| 

| 

| |Sends message "1V12I" to the remote| 
| [terminal and then sends the central| 
| loperator the message "1V11I". 

| |Posts the SNA manager and detaches. | 
|Establishes SNA control block | 
|construction (SUCB, LUCB and WACB). 


| 
| 
| 
| 
| 
| 


Figure 3-71 (Part 1 of 4). Description of RJE,SNA Routines 


a8 
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|Routine 


| IPWSSSN 
| SNA 
|Manager 


| 
| 
| 
| 
| 
| 
| 


| IPWSSSN 
| Segment 
| SUBTASK 


| 
| 
| ; 
| 
| 
| 
| 
| 


| IPWSSSN 
| Segment 
| MAIN 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Figure 


|Called/ 


|Attached by| 


| IPWS$SN 
| INIT 


IPWSSCP 


penne by: 


| 
| 
| 
| 
| 
bs 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 
VTAM due | 
to: | 
RECEIVE | 
ANY input | 
via VTAM | 
exit | 
VSE/POWER | 
routines: | 
IPWS$AQ | 
IPWSSCM | 
IPWSSIB | 
IPWSSLH | 
IPWSSLN | 
IPWSSMS | 
IPWSSOB | 


3-71 (Part 3 of 4). 


IPWS$NU 


IPWSSNU 


|Returns to |Function or Notes | 


[Sets up following ECBs in the TCB | 
lof IPWSSSN: | 
|* VTAM RECEIVE ANY ECB | 
|* Work ECB for RJE,SNA posting of | 
| IPWSSSN. | 


|Attaches a VSE subtask. Issues VTAM| 
|""RECEIVE ANY" macro. Prints central| 
[operator message "1V04I" and waits | 
{on ECB posting. | 


|When called the first time at | 
|RJE,SNA start-up time, it calls the| 
| IPWSSVE-Segment INIT and enables _ | 
|communication through VTAM with 
|SETLOGON macro. Then posts IPWSSSN 
|ECB and VSE/POWER master ECB, and 
|waits on posting by IPWSSSN. 


| 
| 
| 
| 
| 
|At termination time, the VTAM macro| 
|SETLOGON QUIESCE is called to halt | 
|further LOGON requests. | 
|After VTAM posting due to SNA line 
|activity, a RDR task is attached 
|lwhich causes IPWSSIB to execute. 


| 
| 
: 
|After posting from other VSE/POWER | 
|routines, a scan of the work | 
|station control blacks (SUCBs) and | 
|logical unit control blocks (LUCBs) | 
lis made. If any found to be | 
|active, the appropriate processor | 
|ltasks are attached: | 
|¢ LST or PUN tasks (IPWSSOB) | 
|° Messages (IPWSSMP) | 
|® Logon/logoff tasks | 

| 


[Then a loop back is made to wait on 
|further posting. 


Description of RJE,SNA Routines 
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promt rr cn conn en nn nn ne nen on ee ee oe = e+ + +e oe eo + + + + + + == + 
|RIE,SNA t When t ! t 

{Control t | | | 

(Blocks/ t {Created [Stored {Purpose/General Contents 
{Work Areas |Created: }Preed: [bys fats: t 

poeeere= eee ee ee we ee ow ee we we ee ee ee a ow em we = wt = a me ee a a a eee 
(CAT {At VSE/POWER {At VSE/POWERRIIPWSSI1 |Real 

{ (Control {Initialization|Termination| {storage 

(Address l t | larea 

tTable) | i} t I 

See tee err ra ee ee aa ae eo ee eee en ee ee | 
[SNCB [At VSE/POWER (At VSE/POWERIIPWS$I7 [| Pixed {RIE,SNA control piock. 

(SNA {Initialization|Termination| {real t 

!Control i] | ! {storage | 

| Block) | i t farea | 

Sa Se ee i on a ee eT Te RE Le One ne ae ee eee t 
{COCB {At time of [At RJE,SNA |IPWSSOC |GETVIS !Contains compaction table 

( (Compaction|first coapac- |Termination| farea {nawes, pointers and status. 
(Control ttion table P(IPW$SSN) | | { 

| Block) fusage | ! t | 

t oe ew we ww ww ow ee oe ow oe wer ee ee wee we ae eo ee ew ow we a oo oe ew ee ee we ae we oe ee we ee we ee we 
{LRCB At first LU {When (last) {IPWSSVE |GETVIS {Used for LOGON processing. 

{ (Logon | LOGON {LOGON t jarea {Consists of a neader plus 
{Request ! {processed | | {LRUB*s. 

{Control l ((IPWSSLH) | I { 

1 Block) ! ! I | | 

{ ee re ee Oe ee ee ee ee er we we ee ew em eo = oe ee ee ee = er we ee a ee a ew ew ew eee 
[LUCB [Space reserved{At work (IPWS3$LH |GETVIS 

| (Lo fat logon of {station | Jarea 

(Control (first LU of tlogoff time} ! 

t{Block) lwock station | (IPWS$$LP) t | ! 

J fInitialized by{ { { t 

t {IPWSSLN I ! ! t 

|--——_—---_-_—_. 

tLogon LUCB |JAt LOGON of {At RJF,SNA |IPWS$SVE-|GETVIS 

] tfirst Lo of [Termination}Segment jarea 

| fwork station | (IPW$$SN) | LOGOR | 

{ a tr en 
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Figure 3-72. Description of RJE,SNA Control Blocks and Work Areas 
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RJE,SNA — Logon 


(Logon) 
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Exit 





Set indicator 
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(cont.) 


Figure 3-73 (Part 2 of 9). RJE,SNA Execution Flow 
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RJE,SNA — Receive 
Console/Card Reader Data 
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3-73 (Part 4 of 9). RJE,SNA Execution Flow 
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Partition 
job 
output 
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Set to 
Queue File 
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RJE,SNA — Transmit 
List/Punch Output Data 
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output 
available 
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device 
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work 
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interface 


(cont.) 
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Figure 3-73 (Part 6 of 9). RJE,SNA Execution Flow 
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RJE,SNA — Logoff 
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(cont.) 


Figure 3-73 (Part 8 of 9). RJE,SNA Execution Flow 
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Figure 3-74. RJE,SNA Control Block and Work Area Chaining 
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Note: The page fault currently handled for this partition and the 
address of the related TCB are saved in the appendage routine itself. 


Attention Interface Appendage 


Refer to "Initiation of the Permanent Command Processor Task" on page 3-65. 


RJE,BSC and PNET,BSC Channel End Appendage 


During VSE/POWER initialization a modification is made to the PIB of the 
VSE/POWER partition in order to allow for a channel end appendage used for all 
RJE,BSC and PNET,BSC I/O operations. All RJE,BSC and PNET,BSC CCBs contain the 
address of the same channel end appendage routine, which is located in the 
VSE/POWER nucleus. 


The appendage routine gets control from the VSE/Advanced Functions I/O interrupt 
handler whenever an interrupt is received from a BSC line. It then performs the 
following functions: 


e If the line is a RJE line: 


1. It queues the LCB to an LCB chain that will be processed by the line 
manager. 


2. It posts the line manager ECB, the VSE/POWER master ECB, and sets the 
VSE/POWER partition dispatchable. 


° If the line is a PNET line: 


1. It queues the input/output buffer to the buffer queue anchored to the 
TCB of the PNET driver. 


2. It posts the PNET driver ECB, the VSE/POWER master ECB, and sets the 
VSE/POWER partition dispatchable. 


Control is then returned to the next sequential instruction in the VSE/Advanced 
Functions supervisor. 
Hot Reader Appendage 


The supervisor passes control to this appendage whenever an unsolicited device 
end interrupt for a unit-record device is recognized. 


The reader TCBs are scanned on cuu number to locate the task concerned with the 
interrupt. If the matching task is inactive, it is posted dispatchable. The 
VSE/POWER partition is set dispatchable. In all other cases, no action is 
taken. 
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|Event | Appendage |Task Selection Action [Control | 
{Blocks | 

|Page fault |Page Fault |Place current task in wait | TCB | 
|occurred | (pre-processor)|state, reenter task selection. | | 
| | 

|Page fault |Page Fault |Make task. dispatchable, | TCB | 
| completed | (post- |activate partition. | | 
| | processor) | | | 
| | | | 
|Attention | Attention |Make CP task dispatchable, |TCB,CPB| 
| interrupt | Interface |activate partition. | | 
| | 

|Unsolicited |Hot Reader |Set RDR task dispatchable, | TCB | 
ldevice end | |activate partition. | | 
| | | 

|BSC channel |Channel END |Set RJE,BSC line manager (LM)/ |TCB,LCB| 
|end | |PNET driver (LD) dispatchable, |NCB | 
| | |activate VSE/POWER partition | | 
| | | | 
|SVC 0 inter- |SVC 0 |Set XR/XW task dispatchable, |TCB,PDB| 
|cepted | |activate partition. | | 
| | | 

| SVC 90/SVC 91 | SVC 90/SVC 91 |Set XR task dispatchable, |TCB, PDB | 
| interrupt | |activate partition. | | 
| | | 

[Expiry of |Interval Timer |Set VSE/POWER partition | CAT | 
| | | 


[interval timer |dispatchable 


Figure 3-75. Appendage Summary 
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° Another system could be saving the account file, which must also complete 
before control can be released 


e Another processor that has locked the queue file may have a job that is both 
in a higher priority partition than VSE/POWER and in a loop; thus it cannot 
issue an UNLOCK 


If one of these cases occurs and the time interval T4 expires, a warning message 
will be sent to the operator and VSE/POWER will set up time interval T4 again. 


The timer task performs its time slicing and LOCK/UNLOCK within a VSE subtask. 
This ensures that the VSE/POWER main task and its internal subtasks do not enter 
wait state. 


If PNET is used in conjunction with shared spooling, then an additional table, 
called node attached table (NAT), is initialized in the DMB. This table is used 
to communicate between sharing systems those adjacent nodes that are currently 
attached for networking. Whenever a node is signed on an entry is made in the 
NAT. When the node is terminated then the entry is removed. 


Whenever a job or output is destined for a node which is not directly attached 
to this sharing system, the add-to-queue function checks the NAT for the 
required node name. If an entry is found then the job or output available bit is 
set to inform any other sharing systems that something has been placed in the 
transmission queue. 


The NAT is part of the master record and thus is written to disk and read from 
disk by the timer task (IPWSSTI) during every time slice. 


There is also another table in the DMB, called the ‘Shared Remote-Id Table 
(SRT), which is used in a similar way to the node attached table. Every time 
output becomes available for a remote work station which is not attached to the 
system producing the output, a bit is set on for the corresponding remote-id in 
the SRT. This informs the other sharing systems that there is output in the 
queue for them. This table is also controlled by the timer task (IPWSSTI). 
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4. DIRECTORY 


The purpose of this section is to establish relationships between program iden- 
tifier names (phase names, module names, control section names, and segment 
names) and also among these names, 5, "Data Areas" of this manual, the charts in 


VSE/POWER Program Logic Manual Part 2, and VSE/POWER Program Logic Manual Part 
3s 
The names listed in the column "Module/Microfiche Name" are the names of the 


respective microfiche cards. 


¢ Determine the type of name of any program identifier (phase, module, control 
section, macro, or segment). 


¢ Determine the phase with which that name is associated. 


e If the name is a phase, locate the appropriate chart in VSE/POWER Program 
Logic Manual Part 2, or VSE/POWER Program Logic Manual Part 3, 


: If the name is a linkage macro, determine the invoked phase and its chart in 


VSE/POWER Program Logic Manual Part 2, or VSE/POWER Program Logic Manual 
Part 3. 


e If the name is a definition macro (control block, or data block), locate the 
matching data area by using Figure 3-5 as a reference. 


A reference list of messages is also included in this section. It relates a 
message with the issuing phase. 


4. Directory 4-1 


INCS 
IPCS 
IPWSxxx 
IPWSSAM 
IPWSSAQ 
IPWSSAS 
IPWSSAT 
IPWSSBM 
IPWSSBR 
IPWSSBS 
IPWSSBW 
IPWSSCA 
IPWSSCAC 
IPWSSCB 
IPWSS$CC 
IPWSSCD 
IPWSSCE 
IPWSSCF 
IPWSSCG 
IPWSSCH 
IPWSSCI 
IPWSSCJ 
IPWSSCL 
IPWSSCLD 
IPWSSCM 
IPWSSCN 
IPWSSCO 
IPWSSCP 
IPWSSCPF 
IPWSSCPS 
IPWSSCR 
IPWSSCRE 
IPWSSCS 
IPWSSCT 
IPWSSCU 
IPWSSCX 
IPWSSDD 
IPWSSDM 
IPWSSDQ 
IPWSSER 
IPWSSFQ 
-IPWSSGA 
IPWSSGD 
IPWSSGF 
IPWSSIB 
IPWSSIC 
IPWSSIP 
IPWSSI1 
IPWSS$I2 
IPWSs13 
IPWSS14 
IPWSSI5 
IPWSSI7 
IPWSSIN 


CSECT IPWSSIN 
CSECT IPWSSIP 
see macro list below 
MODULE 

PHASE IPWSSAQ 
PHASE IPWSSAS 
PHASE IPWSSAT 
PHASE IPWSSBM 
PHASE IPWSSBR 
PHASE IPWSSBS 
PHASE IPWSSBW 
PHASE IPWSSCA 
PHASE IPWS$SCAC 
PHASE IPWSSCB 
PHASE IPWS$CC 
PHASE IPWSSCD 
PHASE IPWSSCE 
PHASE IPWSSCF 
PHASE IPWSS$CG 
PHASE IPWSSCH 
PHASE IPWSSCI 
PHASE IPWSSCJ 
PHASE IPWSSCL 
PHASE IPWSSCLD 
PHASE IPWSSCM 
PHASE IPWSSCN 
PHASE IPWS$SCO 
PHASE IPWSSCP 
PHASE IPWSSCPF 
PHASE IPWSSCPS 
PHASE IPWSSCR 
PHASE IPWSSCRE 
PHASE IPWSSCS 
PHASE IPWSSCT 
PHASE IPWSSCU 
PHASE IPWSSCX 
PHASE IPWSSDD 
MODULE 

PHASE IPWS$DQ 
PHASE IPWSSER 
PHASE IPWSSFQ 
PHASE IPWSSGA 
PHASE IPWSSGD 
PHASE IPWSSGF 
PHASE IPWSSIB 
PHASE IPWSSIC 
PHASE IPWSSIP 
PHASE IPWSS$I1 
PHASE IPWSS$1I2 
PHASE IPWSS13 
PHASE IPWSSI4 
PHASE IPWSSI5 
PHASE IPWSS$17 
PHASE IPWSSIN 
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IPWSSIN 
IPWSSIP 


IPWSSQM 
IPWSSDM 
IPWSSAT 
IPWSSBM 
IPWSSBR 
IPWSSBS 
IPWSSBW 
IPWSSCA 
IPWSSCAC 
IPWSSCB 
IPWSSCC 
IPWSSCD 
IPWSSCE 
IPWSSCF 
IPWSSCG 
IPWSSCH 
IPWSSCI 
IPWSSCJ 
IPWSSCL 
IPWSSCLD 
IPWSSCM 
IPWSSCN 
IPWSSCO 
IPWSSCP 
IPWSSCPF 
IPWSSCPS 
IPWSSCR 
IPWSSCRE 
IPWSSCS 
IPWSSCT 
IPWSSCU 
IPWSSCX 
IPWSSDD 


IPWSSQM 
IPWSSER 
IPWSSQM 
IPWSSAM 
IPWSSDM 
IPWSSGF 
IPWSSIB 
IPWSS$DM 
IPWSSIP 
IPWSS$I1 
IPWSS$I2 
IPWSS$13 
IPWSS$I4 
IPWSSI5 
IPWS$I7 
IPWSSIN 


4, 
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IPWS$S3 
IPWSSTI 
IPWSSTR 
IPWSST1 
IPWSSVE 
IPWSS$XJ 
IPWS$XR 
IPWSSXW 
T1CSs 
12CS 
13CS 
I4CS 
I5CS 
I7CS 
LDCS 
LDCS1 
LDCS2 
LDCS3 
LDCS4 
LDCS5 
LFCS 
LHCS 
LMCS 
LNCS 
LRCB 
LRCS 
LUCB 
LUCS 
LWCS 
MCB 
MDCS 
MMCS 
MMB 
MPCS 
MSCB 
MSCS 
MXCS 
NCB 
NCCS 
NDT 
NKCS 
NMCS 
NPCS 
NQCS 
NRCS 
NSCS 
NTCS 
OBCS 
Occs 
OECS 
OFCS 
OTCS 
PACS 
PDB 


PHASE 
PHASE 
PHASE 
PHASE 
PHASE 
PHASE 
PHASE 
PHASE 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
Storage 
CSECT 
Storage 
CSECT 
CSECT 
Storage 
CSECT 
CSECT 
Storage 
CSECT 
Storage 
CSECT 
CSECT 
Storage 
CSECT 
Storage 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 
CSECT 


Storage descriptor of control block. 


IPWS$S3 
IPWSSTI 
IPWSSTR 
IPWS$T1 
IPWSSVE 
IPWSSXJ 
IPWSSXR 
IPWSSXW 
IPWSSI1 
IPWSSI2 
IPWS$13 
IPWSSI4 
IPWS$I5 
IPWSSI7 
IPWSSLD 
IPWSSLD1 
IPWSS$LD2 
IPWS$LD3 
IPWSSLD4 
IPWS$LD5 


IPWSSLF 
IPWSSLH 
IPWSSLM 
IPWSSSN 
descriptor 
IPWSSLR 
descriptor 
IPWSSLU 
IPWSS$LW 
descriptor 
IPWSSMD 
IPWS $MM 
descriptor 
IPWSSMP 
descriptor 
IPWSSMS 
IPWSSMX 
descriptor 
IPWSSNC 
descriptor 
IPWSSNK 
IPWSSNM 
IPWSSNP 
IPWSSNQ 
IPWSSNR 
IPWSSNS 
IPWSSNT 
IPWSSOB 
IPWSSOC 
IPWSSOE 
IPWSSOF 
IPWSSOT 
IPWSSPA 


of 


of 


of 


of 


of 


of 


of 


IPWS$S3 
IPWSSTI 
IPWSSTR 
IPWS$T1 
IPWS$VE 
IPWSSXJ 
IPWS$XR 
IPWSSXW 
IPWSS$I1 
IPWS$I2 
IPWS$I3 
IPWSS$I4 
IPWSSI5 
IPWS$I7 
IPWSSLD 
IPWS$$LD1 
IPWSSLD2 
IPWS$LD3 
IPWSSLD4 
IPWSSLD5 


IPWSSLF 
IPWSSLH 
IPWSSLM 
IPWSSLN 
control 
IPWSSLR 
control 
IPWSS$LU 
IPWSSLW 
control 
IPWSSMD 
IPWSSMM 
control 
IPWSSMP 
control 
IPWSSMS 
IPWS$ SMX 
control 
IPWSSNC 
control 
IPWSSNK 
IPWSSNM 
IPWSSNP 
IPWS$SQM 
IPWSSNR 
IPWSSNS 
IPWSSNT 
IPWSSOB 
IPWS$S$0C 
IPWSSOE 
IPWSSOF 
IPWSSOT 
IPWSSAM 


block. 


block. 
block. 


block. 


block. 


block. 


block. 


MP 


MS 
MX 
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MACRO LIST 


Macro 


IPWSAQS 
IPWSATT 
IPWSBUF 
IPWSCAF 
IPWSCLI 
IPWSCNC 
IPWSCTT 
IPWSDAB 
IPWSDAC 
IPWSDBA 
IPWSDBC 
IPWSDCB 
IPWSDCI 
IPWSDCM 
IPWSDCO 
IPWSDCP 
IPWSDCW 
IPWSDCT 
IPWSDDE 
IPWSDDR 
IPWSDEF 
IPWSDET 
IPWSDFC 
IPWSDGN 
IPWSDJK 
IPWSDKA 
IPWSDLC 
IPWSDLR 
IPWSDLU 
IPWSDMC 
IPWSDMD 
IPWSDMM 
IPWSDMS 
IPWSDNC 
IPWSDNR 
IPWSDPA 
IPWSDPC 
IPWSDPD 
IPWSDPN 
IPWSDPW 
IPWSDQC 
IPWSDQR 
IPWSDQS 
IPWSDRM 
IPWSDRQ 
IPWSDSA 
IPWSDSC 
IPWSDSD 
IPWSDSL 
IPWSDSN 


Type 


LINKAGE 

LINKAGE 

LINKAGE 

LINKAGE 

LINKAGE 

LINKAGE 

LINKAGE 

DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
LINKAGE 

DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
LINKAGE 

DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
DEFINITION 
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Phase 

IPWSSAQ 
IPWSSNU 
IPWSSBS 


IPWSS$GA 
Note 1 


IPWSSNU 


IPWSSNU 


IPWS$DQ 


Chart 


AQ 
NU 
BS 
GA/GF 


NU 


NU 


DQ 
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IPWSRSW LINKAGE IPWSSNU NU 
IPWSSAV LINKAGE Note 2 
IPWSSRJ LINKAGE IPWSS$SC sc 
IPWSSTM LINKAGE IPWSSNU NU 
IPWSSXJ LINKAGE IPWSSXJ XJ 
IPWSULP LINKAGE IPWSSLU LU 
IPWSUNV LINKAGE IPWSSNU NU 
IPWSVCA LINKAGE IPW$$CM CM 
IPWSVDA LINKAGE IPWSSNU NU 
IPWSWFB LINKAGE 

IPWSWFC LINKAGE IPWSSNU NU 
IPWSWFD LINKAGE IPWSSNU NU 
IPWSWFI LINKAGE IPWSSNU NU 
IPWSWFL LINKAGE IPWSSNU NU 
IPWSWFM LINKAGE IPWSSNU NU 
IPWSWFO LINKAGE IPWSSNU NU 
IPWSWFQ LINKAGE IPWSSNU NU 
IPWSWFS LINKAGE IPWSSNU NU 
IPWSWID LINKAGE IPWSSNU NU 
IPWSWTO LINKAGE IPWSSNU NU 
IPWSWTQ LINKAGE IPWSSNU NU 
IPWSWTR LINKAGE IPWSSNU NU 
IPWSWTT LINKAGE IPWSSNU NU 

Notes: 


1. Refer to ‘Interface Linkage' under ‘Linkage Conventions’ in VSE/POWER Pro- 
gram Logic Manual Part 2. 


2. Refer to 'Function Linkage' under ‘Linkage Conventions' in VSE/POWER Program 
Logic Manual Part 2. For linkage conventions and register saving con- 
ventions, refer to the appropriate sections of the TCB, which is described 
in 5, "Data Areas" on page 5-1 of this book. 
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19241 
1Q25A 
19261 


19271 
19281 
19291 
1Q2AI 
1Q2BI 
1Q2CI 
1Q2DI 
1Q30D 
1Q30D 
10311 


1Q321 


1Q331 


1Q34] 
1Q341 


1Q35A 
1Q35A 
1Q36I1 
1Q371 
1Q38I 


19391 
1Q3AI 
1Q3CI 
1Q3DI 
1Q40A 


1Q41I 
1Q421 
19431 
1Q44I1 
19451 
10461 
1Q471 


1Q48D 
1Q49I 
1Q4AI 
1Q4BI 
1Q501 
10511 
1Q52I1 
19531 
10541 


QUEUE FILE CHAIN ERROR 
partition-id IN STOP STATE 
GETVIS AREA TOO SMALL 


UNABLE TO INITIALIZE SPOOL MANAGEMENT 

E OV ON cuu 

END OF INPUT ON cuu 

POFFLOAD SUCCESSFULLY COMPLETED, cuu 

NOTHING TO SAVE ON cuu 

PSW=XXXXXXXXXXXXXXKX, CC=yy -progr. check desc. 
VSE/POWER CANCELED DUE TO PROGRAM REQUEST 
ABNORMAL VSE/POWER TERMINATION, PRINTER= 

INVALID PRINTER TYPE, RE-ENTER= 

MORE THAN 80% FULL ACCOUNT FILE (IJAFILE) 


NO MORE ACCOUNT FILE (IJAFILE) SPACE FOR task,cuu 


STOPPED task,cuu 
partition-id 


partition-id WAITING FOR WORK 
task WAITING FOR WORK ON cuu 


EOV ON TAPE, MOUNT NEW TAPE FOR task,cuu 
EOF ON cuu 

task CANCELED DUE TO I/O ERROR ON cuu 
JECL STATEMENT INCORRECT NEAR COLUMN n 
NO DASD SPACE AVAILABLE FOR task,cuu 


JOB jobname FLUSHED BY THE OPERATOR OR BY VSE/POWER 
ERROR WHILE PROCESSING ACCOUNT RECORD, RC=xxx 

INVALID BLOCKSIZE FOR filename 

INVALID CI-SIZE FOR filename 

ON cuu taskid FORMS ffff NEEDED FOR jobname jobnumber 


WRONG PRINTER/PUNCH FOR jobname jobnumber, cuu 

PAGE COUNT EXCEEDS END OF QUEUE ENTRY FOR cuu. 
END-OF-FILE ON TAPE FOR task,cuu 

BOOK lib.book NOT FOUND 

SLI STATEMENT NOT SUPPORTED partition-id 

DISP FORCED TO D FOR jobname jobnumber 

partition-id jobname jobnumber FROM remid user TIME= 


NO MATCHING SPOOL DEVICE partition-id 
INVALID DELIMITER partition-id 

MESSAGE DISCARDED, RC=nnnn 

NOTIFY SUPPORT CANCELED, RC=nnnn 
UNKNOWN KEYWORD partition-id 

INVALID paraname PARAMETER partition-id 


OUTPUT LIMIT EXCEEDED FOR jobname jobnumber part-id,cuu 


OUTPUT SEGMENTED FOR jobname jobnumber part-id,cuu 
Buffer ERROR FOR jobname jobnumber task,cuu 


4. 


IPWS$14 
IPWSS$I5 
IPWSSRY 
IPWSS$T1 
EPWSS$I1 
IPWSS$I5 
IPWSSI7 
IPWSSOT 
IPWSSSY 
IPWSS$OF 
IPWSS$OF 
IPWSSAT 
IPWSSAT 
IPWSSAT 
IPWSSAT 
IPWSSAM 
IPWSS$PF 
IPWSS$PF 
IPWSSAM 
IPWS$XR 
IPWSSOF 
IPWSSTR 
IPWS$XR 
IPWSSLW 
IPWSS$PR 
IPWSSXW 
IPWSSPR 


IPWSSLR 
IPWSSDM 
IPWSS$QM 
IPWSSLW 
IPWSS$PF 
IPWSSSF 
IPWSSSF 
IPWSSLW 
IPWSSOB 
IPWSSLW 
IPWSSLW 
IPWSSQM 
IPWSSSL 
IPWSSXJ 
IPWSS$XJ 
IPWS$XJ 
IPWS$XR 
IPWS$XJ 
IPWSS$XJ 
IPWSSNS 
IPWSSNS 
IPWS$XJ 
IPWSS$XJ 
IPWSSXW 
IPWSSXW 
IPWSSAS 
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IPWSSSF 

1Q84I ACCOUNT SUPPORT CANCELED IPWSSAM 
IPWSSPF 

1Q85I task,cuu WAITING FOR VIRTUAL STORAGE IPWSSNU 
1Q86A DISKETTE REQUIRED ON cuu, FOR jobname jobnumber, HDR1.. IPWSSER 
1Q87I cuu EOJ ADDED jobname, jobnumber IPWSSSY 
IPWSSER 

1Q88I INVALID 3540 UNIT FOR partition-id IPWSS$XR 
1Q89I PROGRAM OUT OF SEQUENCE IN partition-id IPWSSXR 
1Q90I * $$ RDR STATEMENT NOT ALLOWED, JOB FLUSHED IPWSSLR 
* $$ RDR STATEMENT NOT PROCESSED, JOB FLUSHED IPWSSER 

1Q91D cuu NON-COMPATIBLE DISKETTE FOR RDR,cuu IPWSSOE 
1Q92D cuu NO HDR1 FOR fileid, RDR,cuu R= IPWSSOE 
1Q93D cuu SECURED VOLUME/FILE FOR RDR,cuu R= IPWSSOE 
1Q94D cuu EXPECT VOL nn, NOT mm, RDR,cuu R= IPWSSOE 
1Q95D cuu NON-VERIFIED fileid, RDR,cuu R= IPWSSOE 
1Q96I cuu fileid IS EMPTY FILE FOR RDR,cuu IPWSSOE 
1Q97D cuu PREMATURE LAST VOL FOR RDR,cuu R= IPWSSOE 
1Q98D cuu fileid TOO MANY VOLS RDR,cuu R= IPWSSOE 
1Q9nD INVALID RESPONSE R= IPWSSOE 
1Q9nD NO PRECEEDING VOL, INCONSIST RESP R= IPWSSOE 
1QA0I NO SUBTASK AVAILABLE FOR task,cuu IPWSSAS 
IPWSSLD4 

IPWSSTI 

1QA1I SETPRT ROUTINE NOT FOUND IN SVA_ task,cuu IPWSSAS 
1QA3I SETPRT ERROR FOR jobname jobnumber task,cuu IPWSSAS 
1QA4I OUTPUT PROCESSING STOPPED jobname jobnumber task,cuu IPWSSAS 
1QA5A cuu SETUP REQUIRED jobname FORM=ffff FLASH=hhhh THREAD. .IPWSSLW 
1QA6I NO STORAGE AVAILABLE FOR TITTT, cuu IPWSSAS 
IPWSSI7 

1QA7A MOUNT TRAIN FOR UCS=uuuuuuuu jobname jobnumber task,cuu IPWSSPL 
1QA9A task,cuu WAITING FOR OPERATOR REACTIVATION IPWSSLW 
1QB0I SUPERVISOR WITHOUT DASD SHARING FEATURE IPWSS$I2 
1QB1I filename NOT ON SHARED DEVICE IPWS$I2 
IPWSSI4 

1QB2D IS ANY OTHER VSE/POWER SYSTEM ALREADY INITIALIZED ? IPWSSI2 
1QB4I LOCK TABLE SPACE EXHAUSTED IPWSSTI 
1QB5I INTERAL MACRO CALL FAILED, RC=rrmm IPWSSI2 
| IPWSSI4 

IPWSSI5 

IPWSSI7 

IPWSSSM 

IPWSS$TI 

IPWSST1 

IPWSSXW 

1QB6I QUEUE FILE LOCKED BY ANOTHER SYSTEM IPWSS$TI 
1QB7I QUEUE FILE RECOVERY IN PROGRESS [FOR SYSID nl,n2...] IPWSSRY 
1QB8I QUEUE FILE RECOVERY COMPLETED IPWSSRY 
1RO2I LINE cuu STOPPED, TIME=hh:mm:ss IPWSSLM 
1RO3I TRANSM xxxxx, TIMEOUTS xxxxx, ERRORS xxxxx IPWSSLD3 
IPWSSLM 

1RO4I LINE cuu FORCED TO STOP BY PSTOP KILL COMMAND, TIME=....IPWSSLM 
1ROSI SENT xxxxx, RECEIVED xxxxx IPWSS$LD3 
1RO6I LINE cuu NOT TRANSPARENT IPWSSCPS 
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1R521 


1R521 
R521 
R521 


R521 


1R521 


1R52I 


1R521I 
1R521 
IR521 
1R531 
1R541 
1R551I 
1R561 
1R56I 
1R56I 
1R561 
1R56I 
1R561 
1R56I1 
1R56I1 
1R561 
1R56I 
1R56I 


commandcode 


commandcode 
commandcode 
commandcode 


commandcode 


commandcode 


commandcode 


commandcode 
commandcode 
commandcode 
commandcode 
commandcode 
commandcode 


LAST OPERAND INVALID - 


OPERAND 
OPERAND 
OPERAND 


OPERAND 


INVALID 


OPERAND 


INVALID 
OPERAND 
INVALID 
INVALID 
CLASS X 
INVALID 


### NEITHER DECIMAL NOR OMITTED 
### INVALID 
## MISSING OR INVALID 


#i## NO VALID QUEUE 


SPECIFICATION FOR KEYWORD 


#i# NOT SPECIFIED AS VALID KEYWORD 


BUFFER SPECIFICATION 

#### NO DEVICE ADDRESS 

DESTINATION SPECIFIED 
DENSITY 

INVALID 

FILENAME 


NO LOGICAL UNIT LOGGED ON 
lineaddr INACTIVE 
lineaddr NOT INITIATED 
lineaddr PROCESSING remid 
luname LOGGED ON 
luname LOGGING ON 
luname NOT LOGGED ON 

luname PROCESSING remid 

cuu PROCESSING NODE nodeid 

cuu NODE nodeid SESSION PENDING 
JOB-TRANSMITTER 1=A 2=I...... 


4. 


IPWSSCT 
IPWSSCM 
IPWSSCG 
IPWSSCPF 
IPWS$CS 
IPWSS$CX 
IPWSSCT 
IPWSSCT 
IPWS$CA 
IPWSSCAC 
IPWSSCB 
IPWSS$CC 
IPWSS$CD 
IPWSSCF 
IPWSS$CG 
IPWSSCH 
IPWSSCI 
IPWSSCJ 
IPWSSCL 
IPWSSCN 
IPWS$CO 
IPWSSCP 
IPWSSCPS 
IPWSSCR 
IPWS$S$CRE 
IPWSSCS 
IPWSS$CT 
IPWS$CX 
IPWSSCH 
IPWSSCL 
IPWSSCO 
IPWSSCR 
IPWSSCA 
IPWSSCM 
IPWSSCA 
IPWSSCLD 
IPWSS$CM 
IPWSS$CS 
IPWS$CG 
IPWSSCB 
IPWSSCJ 
IPWS$CM 
IPWSSCJ 
IPWSSCI 
IPWSSCI 
IPWSSCI 
IPWSSCI 
IPWSSCI 
IPWSSCI 
IPWSSCI 
IPWSSCI 
IPWSSCI 
IPWSSCI 
IPWSSCI 
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1R79I1 
1R80I 
1R811 
1R811 
1R811 
1R821 
1R831 
1R84I 
1R85I 
1R85I 
1R861 
1R871I 


1R88I1 
1R88I 
1R88I1 
1R88I1 
1R88I 
1R88I1 
1R881 


1R89I 
1R9OI 
1IR9I1I 
1R91I] 
1R92I 
1R931 


1R931 
1R94T 
1R95I 


1R97]J 
1R98I 
1R99T 
1R99I 
1RAOT 
1RA1LI 
1RA2TI 
1RA2I 
1RA3I 


1RA4I 


-commandcode 


commandcode ERRONEOUS AUTOSTART CARD(S) READ' 
WARNING: CLASS SPECIFICATION IGNORED 
MESSAGE OPERAND DOES NOT START WITH QUOTE 
OPERAND TOO LONG OR NO CLOSING QUOTE 
commandcode MESSAGE TEXT WILL BE TRUNCATED 
commandcode 'PSETUP' OR 'PRESTART' IN PROGRESS 
PINQUIRE OPERAND NEITHER ALL LINE ADDRESS 
commandcode DELETION NOT ALLOWED OR IMPOSSIBLE 
commandcode COMMAND NOT ALLOWED FOR REMOTE OPERATOR 
commandcode COMMAND NOT ALLOWED FOR X-PARTITION USER 
PLEASE SPECIFIY DEVICES TO BE SPOOLED 

PSTART TOO MANY CLASSES, FIRST n PROCESSED 


commandcode 
commandcode 


JOB jobname jobnumber CANNOT BE ALTERED 
NOTHING TO ALTER 

NOTHING TO CANCEL 

NOTHING TO DELETE 

NOTHING TO HOLD 

NOTHING TO RELEASE 

OK 


PEND VSE/POWER INITIATION NOT COMPLETE 
commandcode INVALID TASK SPECIFICATION operand 
commandcode TOO MANY OPERANDS, COMMAND REJECTED 
commandcode TOO MANY OPERANDS, FIRST n PROCESSED 
ALLUSER MESSAGE QUEUE IS FULL 

commandcode REMOTE remid CURRENTLY NOT SIGNED ON 


commandcode NO SESSION ESTABLISHED FOR lunamexx 
INVALID DEVICE DUPLICATION 
LINE cuu NOT SUPPORTED 


commandcode COMMAND INVALID DURING SHUTDOWN 
commandcode INVALID VSE/POWER COMMAND 

VSE/POWER HAS BEEN TERMINATED 

VSE/POWER IS IN SHUTDOWN 

job/output jobname jobnum TRANSMITTED TO NODE nodeid. 
job/output jobname jobnum NODE nodeid UNKNOWN 
COMMAND FOR NODE nodel, NODE node2 NOT CONNECTED 
NODE nodeid UNKNOWN 

commandcode VSE/POWER NETWORKING NOT SUPPORTED 


[commandcode] INVALID NODEID nodeid 


4, 


IPWS$CG 
IPWSSCS 
IPWSSCS 
IPWSSCM 
IPWSSCM 
IPWSSCB 
IPWSSCT 
IPWSSCI 
IPWSSCL 
IPWSSCM 
IPWSSCM 
IPWSSCS 
IPWSSCM 
IPWSSCS 
IPWSSCA 
IPWSSCA 
IPWSSCC 
IPWSSCL 
IPWSSCH 
IPWSSCR 
IPWSSCA 
IPWSSCH 
IPWSSCL 
IPWSSCR 
IPWS$$CE 
IPWSS$CS 
IPWSSCM 
IPWSSCS 
IPWSSCB 
IPWSSCB 
IPWSSCX 
IPWSSCP 
IPWSSCS 
IPWSSCI 
IPWSSCJ 
IPWSSCM 
IPWS$SCM 
IPWSSCM 
IPWSSCE 
IPWSSCE 


.. IPWSSNT 


IPWSSQM 
IPWS$ SMX 
IPWS$MX 
IPWSSCAC 
IPWSSCB 
IPWSSCD 
IPWSSCF 
IPWSSCLD 
IPWSSCN 
IPWSSCP 
IPWSSCS 
IPWS$SCX 
IPWSSCA 
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IPWSSSE 
IPWSSLD2 
1REOI ACF/VTAM NOT STARTED OR INACTIVE IPWSSLD4 
1RE1I ACF/VTAM INTERFACE CLOSED FOR NETWORKING IPWS$81 
1RE2I REMOTE SESSION REQUEST FOR NODE nodeid REJECTED, RC=nnnnIPW$$S2 
IPWSSSE 
1RE3I APPLID FOR NODE nodeid ALREADY DEFINED IN NDT IPWSSCLD 
1V01I NO SUBTASK AVAILABLE FOR RJE/SNA IPWSSSN 
1VO2I VTAM OPEN FAILURE RTNCD=nnnn IPWSSSN 
1V03I ERROR ON rplrequest RTNCD,FDB2=nn,nn SENSE=yyyy IPWSSSN 
1VO4I RJE,SNA STARTED IPWSSSN 
1VO5I RJE,SNA TERMINATED IPWSSSN 
1VO6I UNABLE TO LOGON luname RC=nnnn IPWSSLH 
IPWSSLN 
IPWSSVE 
1V07I ERROR ON rplrequest RTNCD,FDB2=nn,nn SENSE=xxx ON lunameIPWSSIB 
IPWSSLH 
IPWSSLN 
IPWSSMP 
IPWSSOB 
IPWSSSN 
1VO8I luname BIND PARAMETERS INVALID IPWSSLH 
1VO9I REMOTE remid LOGGED ON TO applid ON luname IPWSSLN 
1V10I RJE,SNA IS IN SHUTDOWN IPWSSSN 
1V1i1I REMOTE remid LOGGED OFF FROM applid ON luname IPWSSLF 
1V12I LOGOFF COMPLETED FOR luname IPWSSLF 
1V13I LOGOFF FORCED FOR luname IPWSSLF 
1V1i4I SESSION IS IN SHUTDOWN IPWSSSN 
1V15I NO STORAGE AVAILABLE FOR task IPWSSOB 
1V16I NO STORAGE AVAILABLE FOR task FOR luname,remid IPWSSOB 
1V17A task SUSPENDED FOR FORMS MOUNT IPWSSOB 
1V18A REPLY WITH RESTART ON INTERVENTION REQUIRED task IPWSSOB 
1V22I INVALID command COMMAND IPWSSIB 
1V23I command OUT OF SEQUENCE IPWSSIB 
1V24I task TERMINATED REASON=nnnn FOR luname IPWSSIB 
IPWSSOB 
1V25I EOJ ADDED FOR jobname jobnumber IPWSSIB 
1V26I INVALID REMOTE-ID, PASSWORD, OR LUNAME RC=yy IPWSSLH 
1V27I REMID remid EXCEEDS SESSLIM IPWSSLH 
1V28I JOB jobname GETVIS FOR COCB FAILED IPWSsOC 
1V29I JOB jobname GETVIS FOR COMPACT TABLE FAILED IPWSSOC 
1V30I JOB jobname COMPACTION TABEL NOT FOUND IPWS$OC 
1V31I JOB jobname NO SPACE AVAIL. IN COMPACT POOL IPWSSOC 
1V32I JOB jobname INVALID COMPACTION TABLE IPWsSsoc 
1V33I REMOTE remid OUTPUT FOR NON WRITER WORK STATION IPWSSSN 
1V34I display of bind parameters IPWS$LH 
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5. DATA AREAS 


This section describes the control blocks, buffer areas, save areas and work 
spaces required by VSE/POWER in addition to the storage layout of the VSE/POWER 
partition. 


The first three figures act as a visual table of contents and contain references 
to the figure numbers where every area is shown in detail. Relationships 
between fundamental areas are shown in Figure 5-26 to Figure 5-36 in the form of 
a series of examples. 


Most VSE/POWER control blocks and many sections of VSE/POWER code are equipped 
with storage descriptors which serve to rapidly locate and identify important 
values within a storage dump. A storage descriptor is a 16-byte alphameric 
character string with line alignment. Where appropriate, storage descriptors 
may also be addressed by internal programming. For instance, the storage 
descriptors of some TCBs are modified dynamically to reflect the function that 
the TCB is performing at any given time. For example, a storage descriptor of 


TCBb1RDR.030.000 


indicates the start of a task control block for an RJE reader task on RJE line 
number 30 invoked by the central operator. Thus, a storage descriptor identi- 
fied in a dump constitutes a debugging aid. 


THE POSITION OF THE VSE/POWER DATA AREAS 


The VSE/POWER Partition Storage Layout 


The layout of the VSE/POWER partition storage is illustrated in Figure 5-1 . 
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VSE/POWER Partition Layout 


(cont.) 


IPW$$XJ - Execution JECL Scanner 


IPW$$XR - 


IPW$$XW - 


IPW$$DQ - 


IPWS$$AQ - 


IPWS$NQ - 


IPW$$ROQ - 


Virtual Virtual IPW$$FQ- 
Partition Storage 
(cont.) (cont.) 


IPWE$LU - 


IPW$$AS - 


IPWE$TR 


IPW$$OT - 


iPW$$OF 


IPW$$ER 


| IPW$$OE - 


Figure 5-1 (Part 2 of 4). VSE/POWER Partition 





Execution Reader 


Execution Writer 


Delete Queue 


Add to Queue 


Get Next Queue 


Request Queue 


Free Queue Pageable VSIZE 
Storage (cont.) 
{cont.) 


Logical Unit Assigns 


Asynchronous Service 


- Abnormal Termination 


Open Tape 


- Offloading Queues 


- 3540 Physical Reader 


Open 3540 Device 


(cont.) 


Storage Layout 


Si 


Data Areas 


a=3 
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VSE/POWER Partition Layout 
Optional Support (cont.) 





IPW$$CPS - PNET Command PSTART 


Virtual Virtual 
Partition Storage 
(cont.) {cont.) 


Pageable VSIZE 
Storage {cont.) 
(cont.) 






























IPW$$CPF - PNET Command PFLUSH 






GETVIS Area 
— RJE,SNA Work Area GETVIS = ALLOC 
— work area used during Printer setup minus SIZE of 
processing “11 EXEC SIZE =" 
{also pageable} 





End of 
Partition 


Figure 5-1 (Part 4 of 4). VSE/POWER Partition Storage Layout 
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Figure 










Partition Save Area (as 
described in DOS/VSE 
SADP, Section 4, part 2) 





















Storage 
descriptor 






Name of control block 


File label area 





Wait control block 





Control Address Tables 
and constants (CAT) 





Storage control block 


VSE/POWER nucleus 
routines 










Message control block 





















Disk Management 
Block 






@ Resource control fields 

@ File control fields 

@ Record control fields 

@ Master record area 

@ Auxiliary queue 
record area 

@ Master class table area and 
class list entry 

@ SYSID class table 

@ Remote table 

@ Shared spooling control 
information 

@ Node attached table (NAT) 














BSC 1/O 
Monitor 
(optional if 
RJE) 











First Page 
Fixable Area 






@ Initiator/ 
terminator TCB 

@ Command processor 
TCB 

@ Module control 
block Q - file 

@ Module contro} 
block D - file 

@ Free space 


Blocks 


Control Blocks Dynamically Allocated in the Fixable Area 


These blocks (Figure 5-4) are dynamically constructed, depending on the tasks 
required at any given time. The organization of the blocks relative to each 


other and the start of the fixable area cannot be truly illustrated. 


5-3. Organization of the VSE/POWER Permanent Area with Fixed Control 


The 


figure, however, lists those blocks that are eligible to be in the fixable area. 


Ds 


Data Areas 


S<7 
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| Description of Use 


| 

| Session Account Record 

| RJE/BSC Line Control Block 

| RJE/BSC Line Manager TCB Fields 
| RJE/SNA Control Block 

| RJE/SNA Message Control Block 

| RJE/SNA Manager TCB Fields 

| Generation Table 

| CCB 

| CCW 

| Separator Line Area 

| Diskette Work Space 

| Asynchronous Service Anchor Block 
| Service Request Block 

| Assign/Unassign Work Space 

| TCB Extension Area 

| Print Status Work Area 

| Virtual Storage Control Block 

| PNET Master Control Block 

| Node Control Block 


| Trace Information Block 


| Storage 


|Descriptor | 


| None 
| None 
| None 
| SNCB 
| MSCB 
| None 
| GNB 

| None 
| None 
| None 
| OEWS 
| ASWS 
| None 
| LUWS 
| None 
| None 
| VSCB 
| PNCB 
| NCB 


| TIB 


| 
| 
| 
| 
| 
| 
| 


a a a 


Figure 5-4 (Part 2 of 2). Control Blocks Dynamically Allocated in the Fixable 


Area 
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ee a Oe Se a ee pers ee rl 


| Description of Area |Storage | 
\Descriptor | 
| RJE,SNA Session Control BLock | SUCB | 


| RJE,SNA Logical Unit Control Block | LUCB | 


| RJE,SNA Logon Request Control Block| LRCB | 


| RJE,SNA Work area | WACB | 
| RJE,SNA Remote Control Block | RMCB | 
| Network Definition Table | NDT | 
| Network Receiver Work Area | None | 
| Receiver presentation workarea | NPWA | 
| Network Transmitter Work Area | None | 
| Composer workarea | NCWA | 
| Start-up Account record | None | 
| Transmitter Account record | None | 
| Receiver Account record | None | 
| PNET Account record | None | 
| ACF/VTAM Driver Control Block | VDCB | 
| SNA Session Control Block | SSCB | 
| SNA Request Queue Element | SRQE | 


| Command Processor Work Area | ---- | 


| SL - Work Area | SLWA | 
| SL - member element | None | 
Mees a a a de a ee 


Figure 5-5. Control Blocks Dynamically Allocated in the GETVIS Area 
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64-67 ACEC 20% limit residual capacity 

68-6B ACAC Current residual capacity 

6C-6F ACMT Maximum track capacity 

70-73 ACLC Residual capacity on current track 
74-77 AC#T Number of tracks per cylinder 
78-79 ACSE Sector values 

7A-7B ACUH Upper Head 

7C-7D ACDL Total account record length 

7E-7F ACPRL Length of block field plus prefix 


e Channel Program (referred to by label ACCH) 


80-87 ACSK Seek CCW 

88-8F ACSS Set sector or TIC CCW 

90-97 ACSH Search CCW 

98-9F ACTI TIC CCW 

AOQ-A7 ACWC Write count CCW 

A8-AF ACWD Write account data CCW 

BO-B7 ACRS Read sector or not used 

B8-C7 ACPM Chan prog modifiers RDATA and RCOUNT CCW's 
C8-CB ACWA Virt addr of workspace buffer 

CC-D7 Not used 


Account File on an FBA Device 





Bytes Label 

Hex. of Field Description/Function 

00-0F AFSDF Storage descriptor (ACB) 

10-13 AFEBF Event control block 
This ECB is posted when the account 
file is emptied. 

14-17 AFLOF Extent lower limit 

18-1B AFHIF Extent upper limit 

1C-1F AFLWF Lockword 


¢ Command Control Block (referred to by label AFCBF) 


20-21 AFCTF Residual count 

22-23 AFCMF Communication bytes 

24-25 AFSTF Device status 

26-27 AFLUF Logical unit 

28 Reserved for LIOCS 

29-2B AFCAF CCW real address 

2C Reserved for PIOCS 

2D-2F AFLAF CCW address in CSW 

30-33 AFTCB Save account TCB address 

34 AFPBF PUB device type code 

35 AFDTF DTFPH device type code 
F = FBA device 

36 AFSTATUS Processing status byte 
X'80' = process current CI 


Xx'40' IPWSSPF wait on full file 
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e Extent description block (referred to by label AFEDT) 


98 


99-9B 
9C-9F 
A0-A3 


A4-A7 
A8~-AF 


AFMBF 
AFPWF 
AFPDF 
AFIWC 


AFBBF 
AFFBF 


AFLBF 


Mask byte 
X'CO' = permit all write commands 
X'04' = permit all diagnostic commands 


X'40' = inhibit all unit commands 
Reserved, must be zero. 

Physical address of first block 
Relative displacement of first 
block (=0) 

Relative displacement of last block 
Reserved for future use 


¢ Channel Program (referred to by label AFCHF) 


BO~-B7 
B8-BF 
CO-C7 
co 


C1-C3 
C4 
C5 
C6-C7 


C8-D7 


AFDFF 
AFLCF 
AFRWF 
AFRWFO 
AFWRITE 
AFREAD 
AFRWFA 
AFRWFF 


AFRWFL 


Define extent CCW 

Locate CCW 

Read or write CCW 
Operation code 

X'41' = CCW write command 
X'42' = CCW read command 
Data address 

Flags 

Not used 

Data length 

Not used 


HOW TO LOCATE: Refer to Figure 6-2 in 6, "Diagnostic Aids" 
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De ge ee oe eh ee ee eg ee ew Qe ng ge ge Mt te eed 


|Field |Description |Field | 
| Name lType & | 
| Length? | 

|EXSIO |Length of SIO table. | BL2 | 
| EXTAC |Length of total account record. | BL2 | 
| |Reserved. | CL6 | 
| EXDJOB |VSE job name from // JOB card. | CL8 | 
| EXDUSER 116 bytes user information from // JOB card. |CL16 | 
|EXPID |Partition ID in EBCDIC format. | CL2 | 
|EXDCANC  |VSE cancel code. |BL1 | 
| EXTYPE |Type of record; S =job step, L =last step. |CL1 | 
|Reserved. | CL4 | 

|EXPHASE |Phase name, taken from // EXEC card. |CL8 | 
|EXENDAD |End addr. of active program phase, COMREG. | BL4 | 
|EXCPUTM |Processor time in 300ths of a second (see Note). [BL4—s| 
| EXOVHTM |Overhead time in 300ths of a second (see Note). | BL4 | 
|EXALLTM  |All-bound time in 300ths of a second (see Note). | BL4 | 
|EXSIOTB |SIO tables: 6 bytes for each device specified by | | 
| |SYSGEN options, as follows: | | 
| |two bytes for device address (Ocuu), | | 
| |four bytes for count of SIOs in current job step.* | | 
|EXSIOTB+m |Overflow byte: normally X'20', but X'30' if | | 
| |more devices are used within a partition | | 
| |than specified by SYSGEN options.° | | 
|EXSIOTB |User account information (provided via user | | 
| +m+1 |PUTACCT macro). ° | | 


Stop time may be higher than the time logged on console to account 

for VSE/POWER job termination. 

2 Contains the constant 'VSE/POWER-E.A.R' (execution account record) 
for the VSE/POWER partition execution account record (written during 
normal shutdown). 

3-C: alphameric, B: binary, P: packed decimal 

* VSE/POWER will update the SIO tables in the execution account record 

with the number of I/Os it has intercepted for spooling purposes. 

m = Total length of SIO tables (EXSIO). 

Maximum length of execution account record = 2008 bytes. 

account file resides on an FBA device, the maximum length is 

1995 bytes.) 

7 The date format may change if the // DATE statement is used. 


Figure 5-6 (Part 2 of 2). Execution Account Record 


Note: 


(If the 


CPU time: This is the real time used by a job or a job step in the system. 


Overhead Time: This is the time for various activities that cannot be charged 
to a specific program or partition. For example, the time for the calling rou- 
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ACCOUNT RECORD - LIST 


A list account record (Figure 5-7) is created for each list-queue entry that is 
processed by a list task. It is a copy of the first 72 bytes of the correspond- 
ing queue record. 


The DSECT for this account record may be obtained from the PACCNT macro by spec- 
ifying either LIST=YES or ALL=YES. 


5. Data Areas 5-19 


Licensed Material - Property of IBM 
ACCOUNT RECORD - NETWORK 


A network account record (Figure 5-8) is created for every PNET connection or 
session which had been established, when that connection or session is normally 
terminated. It contains information relating to all activity on this connection 
or session. The DSECT for the record may be obtained from the PACCNT macro by 
specifying PNET=YES or ALL as a parameter. 


Peep eee areas ee ee as ew oe ge a ee ey 


|\Field |Description \Field | 

|Name | [Type & | 
| Length? | 

| NETDTE |Date in format specified at SYSGEN (mm/dd/yy or | CL8 

| |dd/mm/yy * | 

| NETSGN |Signon Time (OHHMMSSF; F = sign) | PL4 

| NETSGF |Signoff Time (OHHMMSSF; F = sign) | PL4 

|NETNODE  |Nodeid of connected node |CL8 

|INETNPAS |Node Password |CL8 

| NETPSW |Line Password |CL8 

| NETICNT |Invalid responses per session | BL2 

|NETIDEN |Record Identifier (N) |CL1 

| NETCANC | Cancel Code |BL1 


|X'80' Due to operator command 

| (PSTOP, PSTOP EOJ, PEND) 

|X'40' Due to remote SIGNOFF 

|x'20' Due to time-out 

[x'1 Due to line/error session termination 
[x' i Node stopped due to internal error 
{X'04' ACF/VTAM abnormal termination 

|X'02' ACF/VTAM normal shutdown 


| | 
| | 
| | 
| | 
| | 
| | 
| | 
| NETLAD |Line Address or SNA |CL3 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


|NETTRAN |Transmission count per session BL4 
lor buffers sent during session 

|NETTCNT  |Timeout count per session BL2 

|NETERR |Error count per session BL2 

| ORG |For SNA only 

| NETTCNT | | 

|NETRCVE |Buffers received during session BL4 

| NETSOD |Signoff date in same format as NETDTE CL8 

| NETLNG |Length of account record 


| 1 


The date format may change if the // DATE statement is used. | 
| 


C: alphameric; B: binary; P: packed decimal | 


Figure 5-8. Network Account Record 
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ACCOUNT RECORD - READER 


A reader account record (Figure 5-10) is created for each read queue entry that 


is entered into the VSE/POWER system. 


Whether or not the queue entry has actu- 


ally been placed in the queue file is indicated by the VSE/POWER cancel code. 
The record is copied from the first 58 bytes of the corresponding queue record. 
Reader account records are not created for a writer-only partition. 


The DSECT for this account record may be obtained by specifiying READER=YES or 
ALL=YES in the PACCNT macro. 


Note: 


the Execution Account Record. 


Ue a tae WG ee ee, tk ge a ee eg ee SS P Get Gg SME) md iG el 5 ie at ee 


|Field 
| Name 


| ACDATE 


| ACSTRT 
| ACSTOP 
| ACUSER 
| ACNAME 
| ACNUMB 
| ACIDEN 
| ACCANC 


| RDRADD 
| 

| RDRFRM 
| RDRICL 
| RDRIPR 
| RDRNUM 


| RDRTRK 
| RDRLNG 


[re 3G 


Figure 


Description 


|Date in format specified at SYSGEN (mm/dd/yy or 
|dd/mm/yy). ” 

|Start time of read (OHHMMSSF; F = sign). 

|Stop time of read (OHHMMSSF; F = sign). 


|16 bytes of user information from * $$ JOB statmnt. 


|VSE/POWER job name from * $$ JOB or // JOB card. 
|Job number assigned by VSE/POWER. 

|Record identifier (R). 

|VSE/POWER cancel code. 

|Reserved. 

|Reader device address, or SNA, or PSP, or line 
|address (cuu). With PUTSPOOL. 

|FROM remote ID. 

|Reserved 

|Input class. 

|Input priority number. 


|Number of records read (including record added or 


|deleted by a reader exit routine). 
|Number of tracks for input storage. 
|Length of account record 


alphameric; B: binary; P: packed decimal 
|? The date format may change if the // DATE statement is used. 


5-10. Reader Account Record 


5. 


|Field 


| 


|Type & | 
| Length? | 


|CL8 


| PL4 
| PL4 
|CL16 
|CL8 
| BL2 
|CL1 
lia 
ian 
|BL1 
|BL1 
|CL1 
|CL1 
| BL4 
| 


| BL2 


| 


Data Areas 


The TO remote ID is a dummy entry in the Reader Account Record and in 
It is copied from a FROM remote ID. 
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ACCOUNT RECORD - RJE/BSC 


A line account record (Figure 5-12) is created for each RJE,BSC user session 
when signoff or line stop is processed. It is a copy of the first 62 bytes of 
the line control block. 


A copy of the DSECT for this account record may be obtained by specifying 
BSC=YES or ALL=YES in the PACCNT macro. 


|Field |Description [Field | 

|Name | lType & | 
| Length? | 

| BSCDTE |Date in format specified at SYSGEN (mm/dd/yy |CL8 

: lor dd/mm/yy). ? 

| BSCSGN |SIGNON time (OMMMMSSF; F = sign). | PL4 

IBSCSGF | |SIGNOFF time (OMMMMSSF; F = sign). | PL4 

| BSCUSE |16 bytes user information from the SIGNON command. |CL16 

|BSCPAS |Line password. | CL8 

|BSCIRS |Number of invalid responses during transmission(4).|BL2 

| BSCIDN |Record identifier (T). |CL1 

|BSCSFC -|SIGNOFF code 3 \BLI 


|X'01' - Normal SIGNOFF 
|x'02' - SIGNOFF forced due to PSTOP cuu 
t 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| | 
| | 
-_ 
|x'10' " - PEND or PSTOP cuu,EOJ | | 
| | 
| | 
| 

| 

| 

| 

| 

| 

| 

| 

| 


| 
| 
| |x'o4' - excessive idle time 
| Ix'os' =" - unrecov. I/O error 

} | |x'20' " - real storage shortage 

| | bs : . a eae 1/0 
| BSCTEC |Terminal error count. |BL1 
| BSCLAD |Line address. |CL3 
| BSCRID ade identifier. tas 
Reserved. 

|BSCTRAN |Transmission count per session (1). [Cu1 
|BSCTCNT |Timeout count per session (2). | BL2 
| BSCERR |Error count per session (3). | BL2 

) | BSCSOD |SIGNOFF date (mmddyy) | CL6 
| BSCLNG |Length of account record | 


J $$ __1__—____ 
|? C: alphameric; B: binary; P: packed decimal | 
|? The date format may change if the // DATE statement is used. | 

| 


|? A combination of SIGNOFF codes is possible. 
A a a ee ee 


Figure 5-12. RJE,BSC Line Account Record 


Note: 
Comparing (1) to (2) gives an indication of idle time per session. Comparing 


(1), (2), and (3) gives an indication of line quality. (1), (2), and (3) are 
» also printed locally at SIGNOFF. 
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ACCOUNT RECORD - SYSTEM START-UP 


A system start-up account record (Figure 5-14) is written whenever VSE/POWER 


initialization is complete. 


The DSECT for this account record may be obtained by specifying SYS=YES or 


ALL=YES in the PACCNT macro. 


We cme Se rem ae erg eT Ne me mg hw me Ee ee me Fe A ee ee Gf 


\Field 
| Name 


| PWRDTE 
| PWRSGN 


| PWRVER 

| PWRLEV 

| PWRPARSZ 
| PWRGETSZ 
| PWRRELSZ 
| PWRPART 
| PWRFLAG 
| PWRIDEN 
| PWRDXTN 
| PWRDTRK 
| PWRQTRK 
| PWRATRK 
| PWRLNG 


|? C: alphameric; B: 
|? The date format may change if the // DATE statement is used. 


Figure 


|Date in format specified at SYSGEN (mm/dd/yy or 


Description 


|dd/mm/yy). ” 
|Startup time 


|Reserved 


|Version/modification level 
|Level identifier 
|Partition size 

|GETVIS size 

|Real storage size 
|Partition id 

|Feature flags 

|Record identifier (U) 


|Number of 
|Number of 
|Number of 
|Number of 
|Length of 


data file extents 
tracks/blocks - data file 
tracks/blocks - queue file 
tracks/blocks - account file 
account record 


binary; P: packed decimal 


5-14. System Start-up Account Record 


oo 


|Field | 
|Type & | 


| BL4 


Data Areas 


5-27 


Licensed Material - Property of IBM 

ASSIGN/UNASSIGN WORK SPACE 

DSECTname: LUDS 

The work space is primarily used as a register save area and to contain printer 


setup information when a 3800 printer is being unassigned and asynchronous ser- 
vice is invoked to set up the printer with the system/hardware defaults. 


Bytes Label 

Hex. of Field Description/Function 

00-0OF Storage descriptor 

10-47 LUSV Temporary register save area for the 
interface between functions. 

48-4F LUGR Save area for registers 14-15. Used 
when another function is invoked. 

50-93 LUSP SETPRT parameter list 

94-97 Not used 
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BUFFER CONTROL WORD (BCW) 


When a page is fixed in the fixable area, storage management assigns the first 
and last buffer control words. The first buffer control word is placed imme- 
diately after the page control block at the start of the page in real storage, 
and the last buffer control word is placed in the last two words of the page. 


Real storage within the page is allocated by storage management from the last 
buffer control word. When storage is allocated to a buffer, the last buffer 
control word is updated to reflect the size of the buffer, and a new buffer con- 
trol word is created to immediately precede the buffer. The newly created buff- 
er control word will be used by storage management next time it requires space 
in the fixable area. This is more fully described in 3, "Program Organization" 
of this manual and VSE/POWER Program Logic Manual Part 2. Its format as it is 
printed in a dump is shown below. An example of a page containing buffer con- 
trol words is shown in Figure 5-16. 





Bytes Label 
Hex. of Field Description/Function 
00-01 None Length of previous buffer This halfword contains the 


binary length of the immediately-preceding storage 
buffer. If the buffer is in use its length is stored in 
twos complement form. If the buffer is not in use its 
length is stored in normal form. If the present buffer is 
the first in the page the word is set to binary Zeros. 

02-03 None Length of next buffer This halfword contains the binary 
length of the present storage buffer, that is, the buffer 
which immediately follows this buffer control word in 
storage. If the buffer is in use its length is stored in 
twos complement form. If the buffer is not in use its 
length is stored in normal form. If the preceding buffer 
is the last in the page the word is set to binary zeros. 

04-07 None Owner (TCB virtual address) of next buffer. This fullword 
contains the address of the TCB belonging to the task 
which issued the request for buffer space. If a TCB is 
contained in the buffer, the owner address is that of the 
task which built the TCB. 


Figure 5-16 shows how to interpret BCWs in a standalone dump output. It illus- 
trates a page containing seven buffer areas which contain control blocks that 
existed in the fixable area at the time the dump was executed. The size of each 
buffer in use can be seen recorded in twos complement form in the BCWs, as well 
as the task which issued the request for buffer space. 
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BUFFER LAYOUT 


buffers as provided by the function is shown below. 


Definition Macro: IPWSDVD BUF=YES 


Bytes 
Hex. 


Label 





of Field 


Description/Function 


¢ Buffer header common part 


000-003 
004-007 
008-00B 
00C-00F 
010-011 
012-013 
014 


015 


016-017 


BUFNEXT 
BUFREAL 
BUFOWN 
BUFNCBA 
BUFDATL 
BUFSZ 
BUFSTAT 
BUFFREE 
BUFPOST 
BUFRRPL 
BUFBCBI 
BUFTERM 
BUFSTCH 
BUFEST1 
BUFRIF 
BUFPGR 


BUFPRJ 
BUFEOF 
BUFADS 
BUFCMC 


* Data portion BSC 


018-020 
018-019 
01A 


01B-01C 
01D 
O1E 
O1F 
020 
016-017 


BUFDATA 
BUFSTRT 
BUFBCB 
BUFMLIC 
BUFBRES 
BUFBBYB 
BUFFCS 
BUFRCB 
BUFSRCB 
BUFSCB 
BUFEOB 


* Data portion SNA 


| 018-01A 
| 01B 


BUFRIDD 


Next buffer in chain 
Real (pfixed) address of buffer (BSC) 
Address of related TCB 
Address of related NCB 
Count of bytes to send or received 
Buffer size (excluding header) 
Status flag 
X'80' - Release buffer on send complete 
X'40' - Post task when buffer sent 
X'20' - Buffer contains response RPL (SNA) 
X'10' - Send ‘ignore BCB' (BSC) 
X'08' - Terminating buffer (BSC) 
X'04' - Status change requested 
Data stream status 
X'80' - RIF sent/received 
X'40' - PGR sent/received or 

receiver cancel sent/received 
X'20' - NPGR sent/received 
X'10' - EOF sent/received 


X'08' - Abort transmission 
X'04' - EOT sent/received 
Reserved 


Data portion of BSC TP buffer 
Transmission control bytes 

Block control byte 

X'80' - MLI control bit 

X'20' - Reset expected block sequence CNT 
X'10' - Bypass block sequence validation 
Function control sequence 

Record control byte 

Subrecord control byte 

String control byte 

End-of-block RCB 

Reserved 


Decompressed RID of list record 
Unused 


5. Data Areas 


The control of buffers for PNET is done by buffer management. The layout of the 
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CANCEL CODES OF VSE/POWER 


Figure 5-17 shows the VSE/POWER cancel codes that appear in several VSE/POWER 
records. 


[re ee re NS a en ee pee me iy ee eg Ey Re eee ef 
| Cancel Code | Condition | 


x'10' Normal end of VSE/POWER job or task (see Note 1). 
Xx'20' PCANCEL was issued. 
x'30' PSTOP command was issued (see Note 2). 


| | | 
| | | 
| x'4o' | PFLUSH command was issued. | 
| | | 
| | | 
| | | 


x'50' PDELETE was issued. 
x'60' VSE/POWER job was flushed via RDREXIT. 
X'70' VSE/POWER job canceled due to I/O error. 


Figure 5-17. Cancel Codes of VSE/POWER 


Note: 
1. Although no abnormal VSE/POWER termination occurred, the VSE/Advanced Func- 
tions jobs associated with the queue entry could have been canceled via 


VSE/Advanced Functions. 


2. The PSTOP cancel code is not stored in an account record if the EOJ option 
was specified in the PSTOP command. 
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COMMAND CONTROL BLOCK (CCB) 


Definition Macro: IPWSDCB 


The layout of a Command Control Block is shown below. 


Bytes 
Hex. 


00-01 
02 
03 
04 
05 
06 
07 
08 
09-0B 
OC 
OD-OF 
10 


Flags 


Flags 


Flags 


Flags 


Label 





of Field 


CBCT 
CBC1 
CBC2 
CBSD 
CBSC 
CBLC 
CBLN 
CBLI 
CBCA 
CBPI 
CBCS 
CBNX 


WDE 
AUIO 
UIO 
RODC 


CCR 
CHN9 


UE 
UNCK 


EXR 
PRU 
SID 


Description/Function 


Residual count 

First communication byte (see flags A) 
Second communication byte (see flags B) 
Device status byte (see flags C) 
Channel status byte 

LUB class (see flags D) 

LUB number within class 

LIOCS communication byte 

CCW address 

PIOCS communication byte 

CCW address in CSW 

First entry outside CCB 


X'04' = wait for device end 

X'10' = accept unrecoverable I/0 error 
X'20' = unrecoverable I/O error 
X'08' = return on data check 

X'0O1' = command chain retry option 
X'02' = channel 9 overflow 

X'01' = unit exception 

X'02' = unit check 

X'80' = EXCP real 

X'01' = programmer unit 

X'20' = sense information desired 


5s 
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65 SWFLAG2 
SWREPLY 


SWAUTOST 


SWERROR 


66 SWFLAG3 
SWINDEV 


SWDELAY 


SWDEL 


SWNOCCO 

SWUSERS 
67 SWFLAG4 

SWMSG 

SWPBCST 

SWF4all 

SWF4NOTH 
68-6B 


e Register save areas 


6C-9B CPWRRS 
9C-CB CPWCRS 
CC-FB CPWSRS 


e General work area 


should be offloaded 


Flag byte 2 


x'80' 


x'40' 


x'20' 


turned on by caller of message routine 
to indicate answer required 

turned on to indicate that the initiator 
task must be prompted to supply address 
of device to be spooled 

turned on when an error message should 
be issued to central operator even when 
AUTOSTART is in progress 


Flag byte 3 


X'80' 


x'10' 


x'o0s' 


indicates that the device type designated 
in the PSTART command is inconsistent 
with the task type 

indicates that a warning message must 

be delayed, to avoid the disappearance 
of the appropriate TCB 

turned on by PALTER processor when the 
queue set to be altered must be deleted 
and then added in its correct place in 
the class chain, rather than rewriting 
the queue record in the current place 
turned on by PALTER processor when 
attributes other than 

##-of-copies should be changed 

turned on by calling routine to indicate 
indicate that reg 5 should be used as 
TCB pointer 


Flag byte 4 


x'8o' 


turned on by PDISPLAY processor if messages 
are to be suppressed 

turned on by PBRDCST processor if messages 
have to be truncated 
turned on by PINQUIRE processor if 'Al1' 

is specified as lst operand 

turned on by PINQUIRE processor if 

nothing to display 


Reserved for future use 


Register save area for root phase 
Register save area for command proc 
Register save area for subroutines 


The following 64 bytes are used as general purpose work area, which may be 
broken down into fields as it is required. 


FC-11B CPWGW1 
11C-13B CPWGW2 


e Message output area 


Work area 1 
Work area 2 
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228 Flag byte 2 

229 reserved for future use 
22A-239 Operand 

23A-23B OP4HEX Hexadecimal value of operand 
23C-23D OP4DEC Decimal value of operand 
23E-255 OP5 Operand 5 

23E OPLENS5 Length of operand contents 
23F OPSW5 Flag byte 1 

240 Flag byte 2 

241 reserved for future use 
242-251 Operand 

252-253 OP5HEX Hexadecimal value of operand 
254-255 OP5DEC Decimal value of operand 
256-26D OP6 Operand 6 

256 OPLEN6 Length of operand contents 
257 OPSW6 Flag byte 1 

258 Flag byte 2 

259 reserved for future use 
25A-269 Operand 

26A-26B OP6HEX Hexadecimal value of operand 
26C-26D OP6DEC Decimal value of operand 
26E-285 OP7 Operand 7 

26E OPLEN7 Length of operand contents 
26F OPSW7 Flag byte 1 

270 Flag byte 2 

271 reserved for future use 
272-281 Operand 

282-283 OP7HEX Hexadecimal value of operand 
284-285 OP7DEC Decimal value of operand 
286-29D OP8 Operand 8 

286 OPLEN8 Length of operand contents 
287 OPSW8 Flag byte 1 

288 Flag byte 2 

289 reserved for future use 
28A-299 Operand 

29A~29B OP8HEX Hexadecimal value of operand 
29C-29D OP8DEC Decimal value of operand 
29E-2B5 OP9 Operand 9 . 

29E OPLEN9 Length of operand contents 
29F OPSW9 Flag byte 1 

2A0 Flag byte 2 

2Al1 reserved for future use 
2A2-2B1 Operand 

2B2-2B3 OP9HEX Hexadecimal value of operand 
2B4-2B5 OPIDEC Decimal value of operand 


* Dummy TCB definition 


Bytes 2B8-42F are reserved for the dummy TCB definition. The details are 
shown in the TCB definition. 
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474-47F 
474-479 
47A 
47B 


47C-47E 
47F 


CPWCLAR 
CPWCLAS 
CPWCLIX 
CPWCL#C 


CPWCLTI 
CPWCLDF 


Argument list 

Class(es) up to 4 classes 

Used for translation of class char 
Max number of valid classes 

- 4 for execution-reader tasks 

- 4 for physical-writer tasks 

- 1 for physical-reader tasks 

Task type ('LST', 'RDR' or 'PUN') 
Default class 


* Variables used for subroutine 'QRINSPCT' 


The following arguments are set up by the calling routine in order to deter- 


mine if a queue set meets all applicable criteria. 


When an argument con- 


tains hex zeros it is assumed to be not important and will not be checked. 


480-4BF 
480-487 
488-489 
48A 
48B 


48C 
48D-48F 
490 
491-498 
499-49F 
4A0 
4A1 
4A2 
4A3 
4A4-4AB 
4AC-4B3 
4B4-4B7 
4B8-4BF 


CPWQARG 
CPWQAJN 
CPWOQAJ# 
CPWQACL 
CPWQAF1 
CPWQAF1S 
CPWQABIN 
CPWQADEC 
CPWQAGLN 
CPWQAGJN 


CPWQACDP 
CPWQACPY 
CPWQACSY 


CPWQACNN 
CPWQACUS 
CPWQACFI 


Argument list 

Job name 

Job number 

Class associated to queue set 

Flag byte 1 

X'80' - Job suffix number must be present 
Binary RJE user-id (0 for central) 
Printable decimal RJE user-id 
Length of generic-supplied job name 
Generic job name 

Reserved 

Current disposition 

Current priority 

Current sysid 

Reserved for future use 

Current target node name 

Current user id 

Current forms id (FNO) 

Reserved for future use 


* Variables used for subroutine 'VQEUEID' 


4C0-4C3 
404-4C5 
4C6 
4C7 


CLASSPTR 
CLASSLC 

CLASSQID 
CLASSPCB 


Points to start of class table 
Number of scans to be performed 
Queue-record identifier 

Queue processing flag 


¢ Variables used by operand formatting routine 


4C8-4CB 
4CC-4CF 
4D0-5CF 
5D0-5D1 
5D2-5D3 
5D4-5DB 


CMNDPTR 
DELIMPTR 
TRTTAB 
MAXOP 
OPNUM 
SVEOP 


Points to command-table entry 
Address of current delimiter 

Trans late-and-test table 

Max number of operands allowed 
Current no. of operands in process 
Operand save field 


¢ Variables used for queue manipulation 
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The following fields represent the argument list which will be passed to the 
print status task to perform the appropriate display function. 


5F4-643 
5F4 


5F5 
5F6-5F7 
5F8-5FB 
5FC-604 
605-60C 
60D 
60E-60F 
610-613 
614 
615-616 
617 
618-61A 
61B 


61C 
61D-624 
625-62C 
62D-634 
635 
636 
637 
638-63B 
630-643 
644 
645-647 


CPWDARGL 
CPWDID 


CPWDTOID 
CPWDLU 
CPWDECB 
CPWDFNM 
CPWDUID 
CPWDNMRF 


CPWDBS 
CPWDQID 
CPWDJN 
CPWDBIN 


CPWDFLG 
CPWDREM 
CPWDHLD 
CPWDFRE 
CPWDLOC 
CPWDGJL 
CPWDGJN 
CPWDJOB 
CPWDTNN 
CPWDCDP 
CPWDCPY 
CPWDCSY 
CPWDCFI 
CPWDCUS 
CPWDCLS 


Argument list 

Identification field 

C'P' for PNET display 

C'D' for default display 
Destination of report (RJE remid) 
Programmer logical unit of the printer 
Address of ECB to be posted at completion 
From node name and qualifier 
From user id / remote id 

Flag byte from NMR copied 
reserved for future use 

Begin scan indicator (start of queue scan) 
Queue processing flags 

Job number 

Remote id (binary) 

reserved 

Flag byte 

X'80' PDISPLAY RJE 

X'40' PDISPLAY HOLD 

X'20' PDISPLAY FREE 

X'10' PDISPLAY LOCAL 

Length of generic job name 
Generic job name 

Job name 

Target node name 

Current disposition 

Current priority 

Current SYSID 

Current forms id (FNO) 

Current user id 

Job class 

Reserved 


° Variables used by PDISPLAY PNET command processor 


The following fields together with the common part of the argument list are 
passed to the print status task to perform the PDISPLAY PNET function. 


610-613 
614 


615 
616-61D 


CPWDPPTR 
CPWDFLG1 
CPWDPOWN 
CPWDPLIN 
CPWDPNID 
CPWDPALL 


CPWNODID 


Pointer to specified nodeid 

Flags 

X'80' Own node display 

X'40'Link display request 

X'20' Specific node display request 
X'10' Display all nodes request 
unused 

Node name 


° Variables used by PALTER command processor 


5. Data Areas 5-45 


Licensed Material - Property of IBM 


COMMUNICATOR INFORMATION BLOCK (CIB) 


The communciator information block controls all access to the Notify message 
queue. It is created by the VSE/POWER Notify processor at initialization time if 
'NTFYMSG=' had been specified in the POWER generation macro. 


It is addressed by field CACI in the CAT. 


Definition Macro: 


Bytes 
Hex. 


000-010 
010-017 
018-01B 
010-020 
020-04F 





IPWSDCI 
Label 
of Field Description/Function 
CIBSD Storage descriptor 
CIBWW Work area 

Reserved 

CIBLW Lockword 
CIBSV Register save area (Register 14 - Register 9) 


* General section 


050-053 
054-055 
056-057 
058 


059 


05A-05B 


e VSE/ICCF 


05C-05F 
060-063 
064-067 
068-06B 
06C 


06D-06F 
070-073 


¢ VSE/DSNX 


074-077 
078-07B 
07C-O7F 
080 


CIBTCB 
CIBMM# 
CIBLMC 
CIBFLAG 
CIBIDNT 
CIBACT1 
CIBICCF 
CIBDSNX 


Address of the TCB of the notify processor 
Maximum number of messages allowed in queue 
Lost message count 

Flag byte 1 

X'80' successful identification done 

Action byte 

X'80' - set up connection to VSE/ICCF 

X'40' - set up connection to DSNX 

Reserved 


subsystem section 


CIBIMSG 
CIBIMTL 
CIBIMBS 
CIBICM# 
CIBIFLG 
CIBISIP 
CIBICON 
CIBIQIH 
CIBIQNE 


CIBIXPCC 


section 
CIBDMSG 


CIBDMBS 
CIBDFLG 
CIBDSIP 
CIBDCON 
CIBDQIH 


Address of first message in queue 

Address of tail pointer for message queue 
Address of message being sent 

Current number of messages in the queue 


Flag Byte 1 

X'80' - Send in progress 

X'40' - Connection completed 

X'02' - Queueing of new messages inhibited 
X'O1' - Message added to queue 

Reserved 


Address of XPCCB 


Address of first message in queue 
Address of tail pointer for message queue 
Address of message being sent 


Flag Byte 1 

X'80' - Send in progress 

X'40' - Connection completed 

X'02' - Queueing of new messages inhibited 
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Included by definition macro IPWSDPA for the permanent area. This table con- 
sists of a set of tables, addresses, and constants in the permanent area of the 
VSE/POWER partition, used to link the component routines of the VSE/POWER sub- 
system during execution. The format of this table as it is printed in a dump is 
shown below. 


Register 10 always points to the beginning of the VSE/POWER partition. The dis- 
placements shown in this DSECT are relative to the beginning of the VSE/POWER 
partition, i.e. the fields may be found by using register 10 as a base register. 


Bytes Label 

Hex. of Field Description/Function 

140-14F PASD Storage descriptor (CAT) 

150-153 PAEB VSE/POWER master ECB (refer to Appendix B) 
154-157 PAPA Start address VSE/POWER partition 
158-15B PAFA Start address fixable area 

15C-15F PAVA Start address pageable area 
160-163 PAEN End address VSE/POWER partition +1 
164-167 PALS Start address LTA 

168-16B PALE End address LTA 

16C-16F CAPB Address of VSE/POWER PIB 

170-171 CATI VSE/POWER task id 

172-173 CATS Task id of timer subtask 


e External interface address 


174-177 CAAI Attention interface 


178-17B CAPF Page fault appendage 
17C-17F CAHR Hot reader routine 
180-183 CACE RJE CE appendage 
184-187 CA00 SVC 0 appendage 
188-18B CA90 SVC 90/91 appendage 


¢ External address for BSC nucleus functions 
18C-18F CABM RJE,BSC monitor; nucleus function entry point 


¢ In-core reader cross-partition XECB information 


190-193 ICXP Internal reader XECB 
194 Not used 
195-197 ICTA XECBTAB ADDR of ICR XECB 


¢ Spool/command manager cross-partition XECB 


198-19B SMXP Spool/command MGR XECB 
19C Not used 
19D-19F SMTA XECTAB ADDR of SPM XECB selecting the internal 


RDR task and/or the spool/command 


¢ Spool/command manager LST task 
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210-213 CAD6 MCB data file module 5 
214-217 CAL7 MCB private SSL 
218-21B CAL8 MCB system SSL 


¢ Task state values and addresses of state processing routines. 


These constants are used by the task management macro instructions to set 
values within the task selection fields of the task control blocks (except 


TMCW). 

21C-21F TMCI The task is inactive, task not 
selected. Branch to TM10 

220-223 TMCP Page fault in process, task not 
selected. Branch to TM10 

224-227 TMCO Wait for operator, task not 
selected. Branch to TM10 

228-22B TMCL Wait on locked resource, test 
lockword. Branch to TM30 

22C-22F Not used 

230-233 TMCM Wait on multiple posting, test 
control blocks. Branch to TM50 

234-237 TMCQ Wait on class table posting, test 
control blocks. Branch to TM50 

238-23B TMCC Wait on single posting, test 
control block. Branch to TM80. 

23C-23F TMCS Wait on space posting, test 
control blocks. Branch to TM80 

240-243 TMCD Immediate dispatch, dispatch the task. 
Branch to TM90 

244-247 TMCW Wait state. Used for WCB only wait routine 
Branch to TM20. 

248-24B TMCR The task is running, re-selection address 

24C-24F TMCB Wait on RJE,BSC or PNET event, test 
control block. Branch to TMBO. 

250-253 TMCT Reserved 


¢ Permanent TCB address 


254-257 TATM Wait control block 

258-25B TAOC Command processor TCB 

25C-25F TAIT Initialization/termination TCB 
260-263 TALM Line manager TCB 

264-267 TASP Spool manager TCB address 


e Task Control Address Table. 


The following table is used by the task initiation and termination routines 


to determine the position in the task list at which a new task of a given 


type is to be inserted. The first byte of each entry contains an alphameric 


character identifying the type of task to which the entry relates. The 


remaining three bytes contain the address of the TCB for the most recently 
attached task of that type. If no such task exists the address contained in 
the entry is that of the TCB of the currently attached task which must pre- 
cede any new task of the designated type. 
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e Writer task phases 


29C-29F CAPP Physical punch 

2A0~2A3 CAPL Physical list 

2A4-2A7 CAGD Get data record function 
2A8-2AB CALW Logical writer 


e Execution processor phases 


2AC-2AF CAXJ JECL analysis 
2B0-2B3 CAXR Execution reader 
2B4-2B7 CAXW Execution writer 


* Queue management phases 


2B8-2BB CADQ Delete from queue function 
2BC-2BF CAAQ Add to queue function 
2C0-2C3 CANQ Get next-from-queue 
204-2C7 CARQ Reserve queue function 
2C8-2CB CAFQ Free queue function 


¢ Miscellaneous phases 


2CC-2CF CALU LUB/PUB update function 
2D0-2D3 CAAS Asynchronous service routine 
2D4-2D7 CATR Task terminator 

2D8~-2DB CAOT Open tape routine 

2DC-2DF CAOF Offload queue routine 
2E0~-2E3 CAER 3540 physical reader 

2E4-2E7 CAOE 3540 open routine 

2E8-2EB CASY SYSIN tape support 

2EC-2EF CAPS Print status report 

2F0-2F3 CAIC Invoke command processor function 
2F4-2F7 CARY Queue-file recovery 

2F8-2FB CAAT Abnormal termination program 
2FC~-2FF CAMS Message handler 

300-303 CAMX Message distributor 

304-307 CASM Message definition module 
308-30F Reserved 


¢ Spool management option 
310-313 CASF Spool manager 


¢ Accounting phases 


314-317 CAPA Put account function 
318-31B CAGA Get account function 
31C0-31F CASA Save account function 


¢* Notify and source library include support 


320-323 CANY Notify support 
324-327 CASL Get SSL function 
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420-421 IPIK In-core reader user's PIK 
422-423 SPIK Spool managers user's PIK 


e Service Routine Branch Table (continued). 


The branch instructions are used to transfer control from service routine 
macro instructions to the appropriate service code. 


424-42B VS50 Release virtual storage 
420-433 Vvs90 Unchain element 

434-43B SROO Set remote mask routine 
43C-443 TZ00 Get trace entry routine 
444-45B Reserved for future use 


e Block Length Table. 


The table is used by the IPWSRSW macro instruction to identify the size of 
work space required to accommodate certain control blocks. 


45C-45F BLBF Data buffer - set by INIT (amount of storage 
required to accommodate the data block) 
460-463 BLDB Data block - set by INIT (size of record 


written to disk) 


e Address of RJE,BSC Control Blocks 


464-467 CALC Line control block address 
468-46B CART RJE,BSC remote table address 
46C-46F CALT Line table address 

470-47F Reserved for future use 


e Statistical information (refer to Appendix E) 


480-481 NRRE Highest BSC remote ID 

482-483 NRLI Number of BSC lines 

484-487 NRTR/NBLK Total number of tracks/blocks data 
file for C-K-D/FBA devices 

488-48B NRTW Number of times waiting for storage 

48C-48F NRTV Number of times waiting for virtual storage 

490-493 NRPG Total number of pages allocated 

494-497 NRPC Current number of pages allocated 

498~-49B NRPM Maximum number of pages allocated 

49C-49F NRTC Current number of tasks 

4A0-4A3 NRTH Maximum number of tasks 

4A4-4AB Reserved for future use 
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DATA SET CONTROL BLOCK 


The data set control block is created by the network receiver for each queue set 


to be allocated. 


Its contents are: 


1. Spool control information 
2. Queue set characteristics 


Bytes 


Hex. 


000-00F 
010-013 
014-028 
014-01B 
01C-O1F 
020-023 
024-027 
028-02B 
02C-03B 
02C-033 
034-037 
038-03B 
03C -068 
03C-03D 
O3E 

03F 

040 

041 

042 

043-046 
047-04A 
04B-058 
04B-04E 
04F-056 
057 

058 

059-060 
061-068 


Label 





of Field 


DSDESCR 
DSNEXT 


DSTCDAST 


DSTCBDW 
DSTCBDA 
DSTCBDV 
DSTCBBC 
DSTCBPR 


DSTCQFST 


DSTCBQW 
DSTCBQA 
DSTCBQV 
DSQREC 


DSQRPY 
DSQRQI 
DSQRDP 
DSQRCL 
DSQRNC 
DSQRFI 
DSQRCP 


DSQR3800 


DSQRFL 
DSQRCG 
DSOQRGI 
DSQRPS 
DSQRTN 
DSQRTU 


Description/Function 


Storage descriptor 

Address next DSCB entry 

Data file status field 

¢ Data file seek address (MBBCCHHR) 
Real address logical data buffer 
Address logical data buffer 
Residual block count 

¢ Previous record address 

Queue file status fields 

* Queue file seek address (MBBCCHHR) 
¢ Real queue space address 

* Queue space address 

met characteristics field 

Not used 

Job priority 

Queue record identifier 
Disposition 

Class 

Number of copies 

Forms ID 

Compaction table name 

3800 characteristics 
Forms-overlay identifier 

8 copy groups 

Copy group index 

Burst mode indicator 

Target node name 

Target user ID 
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Record control fields. 


They contain information used to read and write records to and from the mas- 
ter record area and auxiliary queue record area. 


The address XXXXXXXX contains for C-K-D device(s): MBBCCHHR and for FBA 
device(s): MOOONNNN. 


78-7F QCMW Master record address (XXXXXXXX) 
80-83 QCMA Real master area address 

84-87 QCMV Virtual master area address 

88-8F QCQW Queue record address (XXXXXXXX) 
90-93 QCQA Real auxiliary queue area address 
94-97 QCQV Virtual queue record area address 


VSE/POWER communication area. 


The master record is written as the lastt physical record within the queue 
file extent. During VSE/POWER execution a copy of the master record is 
maintained in this area. Whenever this copy is updated a replacement master 
record is at once written to the queue file so that, in the event of a fail- 
ure of the system, warm start information can be recovered from the direct 
access device in question. 


98-9F MRDY Date 


These eight bytes contain the date of 
VSE/POWER execution in the format 
chosen at system generation (dd/mm/yy 
or mm/dd/yy). 


A0-A3 MRST VSE/POWER start time 


A4 


A5 


A6 
A7 


A8& 
A9 


Switch bytes 


The following 6 switch bytes preserve the options established by the 
VSE/POWER user at the time he generated his version. 


MRSL Source library switch 
This byte contains a single alphabetic character 
representing the source sublibrary to be 
searched. 

MRJA Job accounting switch 
This byte contains a single alphabetic character 
The character A indicates that VSE/POWER job 
accounting is required; a blank character 
indicates that VSE/POWER accounting is not 


required. 
MRPP Pause punch switch 
MRLG LOG option switch (set to character L 


if JLOG=YES and blank if JLOG=NO) 
Reserved for future use 
MROP Option byte é 
X'01' - 3540 feed optio 
X'02' - Multiple channel 12 option 
(see POWER macro) 
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DC-DF 
EO-E3 
E4-E7 


PVBS 
PVBM 
PVBN 


Records before segmentation 
Records before message 
Records before next message 


¢ The next 16 bytes contain the timer task values for shared spooling: 


E8-EB 
EC-ED 
EE~-EF 
FO-F1 
F2-F3 
F4-FC 
FD 
FE 
FF 


MREB 
MRT1 
MRT2 
MRTS3 
MRT4 


MRSY 
MRSO 


Shared spooling subtask ECB 
Interval Tl (time slice) 
Interval T2 

Interval T3 (polling time) 
Interval T4 

Reserved 

SYSID of own system 

Shared spooling option byte 
Reserved 


e Auxiliary queue record area (216 bytes). This area is required as a work 
space for an additional queue record, see the description of the Queue 


Record Area (QRA). 


For example, for updating class chain addresses during 


the add to queue function. The first part (136 bytes) of the Q record con- 
tains body fields (information pertinent to this particular queue entry and 
the user job which created it). 


100-187 
100-107 


108-10B 


10C-10F 


110-11F 
120-127 


128-129 


12A 


12B 


QCBF 
QCDY 


QCsT 
QCET 


QCUI 
QCNM 


QCNO 


acai 


QCCN 


Body fields of queue records 

Date in format specified at SYSGEN 

(mm/dd/yy or dd/mm/yy) 

Operation start time, in packed 

decimal (OHHMMSSF; F = sign) 

Operation end time 

(OHHMMSSF; F = sign) 

16 bytes user information 

Job name 

Job name associated with this particular 
VSE/POWER or VSE/Advanced Functions job. 

If no job name is provided by the user the 
default value AUTONAME is set into this field. 
Job number contains a binary number assigned to 
the job upon its entry into the system and 
thereafter available for further identification 
of jobs with a common job name. 

Queue record identifier 


R = read queue record 

L = list queue record 

P = punch queue record 
F = free queue record 

D = dummy queue record 
VSE/POWER cancel codes 
Cancel 

Code Condition 


X'10' Normal end of VSE/POWER job or task 
x'20' PCANCEL has been issued 
X'30' PSTOP has been issued * 
x'40' PFLUSH has been issued 
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154-157 


158-15B 


15C-15F 


160-161 
162-163 
164-167 


¢ 3800 


168-16B 
16C-173 
174 
175 
176 


QCBS 


QCBM 


QCBN 


QCER 
QC I# 
QccP 


printer control 


QCFL 
QCCG 
QCTC 
QCcI 
QCPS 


within input-related queue records. 

Number of records before segmentation 

(count driven segmentation) 

Records before message. 

Binary value representing the maximum number 

of list or punch data records that is to be 
tolerated by this job. When the record count 
exceeds the maximum value a warning message is 
output to the system operator. 

Records before next message. 

Additional number of list or punch data records 
that is to be tolerated by the job each time the 
record count exceeds the maximum value specified 
in the preceding field and the system operator 
elects to continue execution of the job. 
Physical 3540 device address (packed) 

Saved job number for accounting 

Compaction table name 


information 


Forms overlay identifier 

Copy groups 

Total number of transmission 

Current copy group index (restart purposes) 
Paper status (3800 only) 


¢ Continuation of general part 


177 


178-17F 
180-181 
182 
183 
184-185 
186-187 


QCoP 
QCPW 

QCOI# 
QCSID 


QCRL 


Option byte 

X'20' - No separator pages between copies 
Password 

Original job number 

Sysid of target processor 

Reserved for future use 

maximum record length 

Not used 


¢ The second portion (48 bytes) of the queue record contains control fields 
(information relating to the status of the queue record and to its position 
within the VSE/POWER queues). 


188-1B7 
188 


189 
18A 
18B 
18C 
18D-197 
198-19F 


QCCF 
QCxs 


QCFS 
QCSG 
QCcsY 
Qcs1 


QCNS 


Control portion of the queue record 
Execution switch 

X = job in execution 

b = job not in execution 

First in set switch 

Segmentation type (not used) 

Sysid of system processing the queue record 
Control flag byte 1 


Reserved 
Next record in set. (XXXXXXXX) 
M = index in module control block address 
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1F4-1F7 NRQR Total number of queue records 
1F8-1FB NRQF Number of free queue records 
1FC-1FF NRQM Maximum number of queue records used 


®e Account-file values. 


200-207 MRAS Last record address account file (XXXXXXXX) 

208-209 MRSE Sector values 

20A-20B Reserved 

20C-20F MRCF Free space in current control interval or 
residual capacity of current track 

210-213 MRCC Current residual capacity 


e Free queue pointers. 
214-21B MRQF First record in free queue (XXXXXXXX) 


e Master class table area. Defines the status of the VSE/POWER queues. 


21C-3D7 QCCT Master class table (without XMT queue entries) 
21C-2AF CTRT Reader class area (37 entries, that is, 

1 dummy entry and 36 entries 0-9 and A-Z) 
2B0-343 CTLT List class area (37 entries, that is, 

11 dummy entries and 36 entries A-Z) 
344-3D7 CTPT Punch class area (37 entries, that is, 

11 dummy entries and 36 entries A-Z) 
3D8-3DF CTXT XMT class area (2 entries, that is 1 entry for 


RDR and 1 entry for LST and PUN) 


Each area entry in the DMB is defined as a class list entry (DSECT=CTDS) and 
consists of the following two 2-byte fields: 


¢ Relative record number of first queue record in queue set in this class 
chain. 


e Relative record number of first queue record in last queue set in this class 
chain. 


The high-order bit in the last field indicates whether there is a queue entry in 
this class that can be dispatched. (See Figure 5-26 to Figure 5-36 for an 
illustration of this relationship.) Entries in the table also act as ECBs for 
the class chains (refer to Appendix B, "Summary of ECB Usage" on page B-1l). 


¢ Shared spooling Control Words 


3E0 SSID System-id owning queue file 
3E1 SSF1 Flag byte 1 
X'80' - Queue file shared 
X'40' - Account file shared 


3E2 SSF2 Flag byte 2 : 
3E3 SSAC System-ID owning account file 
3E4-3E7 SSWK Work-to-do ECB 

3E8 -3EB SSNW No-work-to-do ECB 
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DSECTS FOR ACCOUNTING (A-FILE ON FBA) 
Definition Macro: IPWSDJK 

This macro maps 4 DSECTs: 

Sequential file header 

Control interval definition field (CIDF) 


Record definition field (RDF) 
I/O area for read device characteristics 


The formats are as follows: 


Bytes Label 
Hex. of Field Description/Function 
¢ Sequential file header 
00-01 HEADBL Block descriptor. Contains length of 
the physical block, including its own length. 
02-03 Reserved 
04-05 HEADRL Record descriptor. Contains length of 
the logical record, including its own length 
06-07 Reserved 


* Control interval definition field 


00-01 CIDFA Start address of the free space in the 
control interval 
02-03 CIDFL Length of free space in the control interval 


* Record definition field 


00 RDFF Flags (always zero) 
01-02 RDFL Contains the length of the corresponding record 


e I/O-area for Read device characteristics 


00 Operation mode 

01 Features 

02 Device class 

03 Unit type 

04-05 RDCBLOCK Physical record size 
06-09 No. of blocks 

OA-1F Reserved 
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A0-A7 
A8-A9 
AA-Bl 
B2-B9 
BA 

BB-C2 
C3 


GNRE 
GN#M 
GNNT 
GNPR 
GNRJ 
GNMT 


RDREXIT name 

Maximum number of messages in Notify message queue 
Network Definition Table name 

PNET Readerexit name 

RJEBSC specification 

Default member type 

Reserved 


¢ Work area for EXTRACT macro. Referred to by label GNWE. The EXTRACT macro 
(SVC98) will be issued from the VSE/POWER load routine which loads IPWSSIP. 
Information about the VSE/POWER partition will be saved in following fields. 


C4-C7 
C8-CB 
CC-CF 
DO-D3 
D4-D7 
D8-DB 
DC-DF 
EO-E7 


GNPB 
GNPE 
GNPG 
GNFX 
GNFC 
GNGB 
GNGE 
GNIN 


Partition begin address 

Virtual partition end address excluding GETVIS 
Virtual partition end address including GETVIS 
Real allocated storage in K-bytes 

Real allocated storage in number of pages 
GETVIS area begin address 

GETVIS area end address 

IPWS$I1 phase name 


¢* During initialization the IPWSSIP phase name is overlaid by the following 


fields: 


EO-E3 
E4-E7 


E8-F4 
F5-F7 


e SNA information 


108 

109-110 
111-113 
114-117 


Variable (depending on 
number of lines (GNNL)) 


Variable (depending on 


GNRM 
GNSS 


GNLT 
GNLU 


GNTT 


GNAL 
GNAP 
GNSU 
GNSR 
GNFR 
GNHR 
GNVA 


GNLA 


Address of remote control block (RMCB) 
Address of SNA unit control block (SUCB) 


LTAB 
Length of LU table. Accumulated 
length of LU= in PRMT macro. 


Table length plus BSC plus SNA 
Reserved 

Length of ACB password 

ACB password 

Maximum number of SNA logical units 
Number of SNA remotes 

First SNA remote ID 

Last SNA remote ID 

Length of APPLID for VTAM 
APPLID for VTAM 

Reserved 

Address of first line block 


BSC line table entries of 16 bytes each 


BSC remote block entries of 28 bytes each 


number of remotes (GNNR)) 
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INITIALIZATION PROCESSOR WORK AREA (IP) 


Definition Macro: 


IPWSDEF IWK=MAP 


This area contains addresses and information that are used in communication 


among the initialization root phase and various initialization phases. 


It is 


located in the initialization-processor work phase (IPWSSIP). 


Bytes 
Hex. 


00-2F 
30-33 
34-37 
38-3B 
3C-3F 
40-41 
42-89 
8A-D9 
DA 


DB 


DC-DF 
E0-E3 


Label 





IWKRSA 
IWIPEA 
IWPPEA 
IWMAXA 


IWLALN 
IWMSGAR 
IWCDIN 
IWABSW 


IWFLG1 


IWGENA 


of Field 


¢ DTF's Address Table 


E4-E7 
E8-EB 
EC -EF 
FO-F3 
F4-F7 


Subroutine Address Table 


F8-FB 

FC-FF 

100-103 
104-107 
108-10B 
10C-10F 
110-113 
114-117 
118-11B 


IWQFILE 
IWDFILE 
IWAFILE 
IWINPTF 
IWPWRLK 


IWUPDT 
IWSUPH 
IWPRST 
IWFMCB 
IWCOLD 


IWGENT 
IWMCBC 
IWMCBF 


e Local directory 


» 110-143 


IWGENL 


list 


Description/Function 


Register save area 
End address of root phase 
End address of last phase 


Maximum 


address for IPLOAD 


Reserved 
Length of overlay area 


Message 


I/O area 


Card read-in area 
Abnormal-warm-start switch 


X'c1' A 
IP flag 
x'8o' 
x'o1' - 
x'02' - 
x'o4' - 
X'os' - 
x'10' - 
Address 


- abnormal-warm-start indicator 
byte 1 


- Other-system-up indicator 


Request termination 
Single load affected 
Load routine cancelled 
Area too small (IPLOAD) 
Feature to be loaded 
of original gen table 


Reserved 


Address 
Address 
Address 
Address 
Address 


Address 
Address 
Address 
Address 
Address 


of queue-~file DTF 

of data-file DTF 

of account-file DTF 

of SYSIPT DTF . 
of queue-file DTL control block 


of update-Q-record address 

of set-up-DTFPH routine 

of print-status-report routine 
of format-MCB routine 

of common load routine 


Reserved 


Address 
Address 
Address 


for CIL 


of VSE/POWER generation table 
of skeleton MCB (C-K-D) 
of skeleton MCB (FBA) 


Directory list for core image library 
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LOGICAL DATA RECORD AREA (LDA) 
Definition Macro: IPWSDDR 


This area is used to hold data which is to be written to the data file (read 
operation) and read from the data file (write operation). Its size is set by 
the DBLK parameter. 


Records are transferred to the LDA one at a time from the PDA for read and for 
write operations. When the LDA is full, or there is no more room for a complete 
record, the information is written to or read from the data file. It is 
addressed via the I/O request word in the TCB, and each record is addressed via 
the channel program in the MCB for the data file. 


The format of a logical data record is as follows. 





Bytes Label 
Hex. of Field Description/Function 

DRDS Definition of this dummy section 
00-01 DRRL Logical record length. 


This field contains the length of the 
data-record text without preceding fields like 
DRRL, DRGP, DRGP2, DRGP3, and DRCC, that 
is in fact the length of DRDT field. 
02 DRGP General purpose byte: 
X'00' normal record 
X'01' line print/card move data 
X'02' 3540 data record 
X'04' end of data 
X'08' break record 
X'10' end of block 
X'20' end of 3540 data 
X'40' extended record 
03 DRCC Command code. 
Indicates command code for output 
list/punch device or 00 when input 
record or spooled-account record. 
04 DRG2 General purpose byte 2 
X'80' job header record 
X'40' data set header record 
X'20' job trailer record 
05 DRG3 General purpose byte 3 
X'80' extended record begin 
X'40' extended record middle 
X'20' extended record end 


06-07 DREL Extended record residual length not including DRDL 
DRDL Length of descriptor = addr(* - DRRL) 
DRDT Text of data record 


HOW TO LOCATE: Refer to Figure 6-2 in 6, "Diagnostic Aids" 
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MESSAGE CONTROL BLOCK (MMB) 


Definition Macro: 


This block provides support for the macros IPWSWTO and IPWSWTR. 
ing one of these macros will invoke message services. 


IPWSDMM 


A routine issu- 


A message to be printed 


on SYSLOG will be passed to the MMB by means of the message request word in the 
TCB. The MMB also contains the channel program (CCB and CCW) to execute the I/0 


to the console. 
execute the necessary I/O. 


If a reply is necessary the channel program in the MMB will 
The message service will move the reply to an area 


addressed by the reply request word in the TCB for the task using the routine 


that issued the IPWSWTR macro. (See also TCMW and TCAW fields in the TCB.) 


The format of this block as it is printed in a dump is as follows. 


Bytes 


Hex. 


00-0F 
10-17 
18-1B 
1C-1F 
20-23 
24-27 
28-2B 
2C-2F 
30-33 
34-37 
38-3B 
30-3F 
40-43 
44-47 
48-4B 
4C-4F 


50-51 
52-53 
54-55 
56-57 
58 

59-5B 
5C-5F 


60-67 
68-6F 
70-F3 
F4-13B 
130-147 


HOW TO LOCATE: 


Label 





of Field 


MMSD 
MMWW 


MMLK 
MMRE 
MMRF 
MMRO 
MMR1 
MMR2 
MMR3 
MMR4 
MMR5 
MMR6 
MMR7 
MMR8 


MMCB 
MMCT 
MMCM 
MMST 
MMLU 
MMCA 


MMCH 
MMWT 
MMRD 
MMMA 
MMMI 


Description/Function 


Storage descriptor (MMB) 
Work area 
Reserved 
Lockword 

Saved register 
Saved register 
Saved register 
Saved register 
Saved register 
Saved register 
Saved register 
Saved register 
Saved register 
Saved register 
Saved register 
Reserved 

CCB 

Residual count 
Communication bytes 
Status bytes 

LUB identifier 

Flags . 

Channel program address 
VSE internal use 
Channel program 

Write CCW 

Read CCW 

Message output area 
Reply input area 
Reserved 


bt be 
Mn & 


On AO Fw HH © 


Refer to Figure 6-1 in 6, "Diagnostic Aids." 
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Module Control Block for FBA Devices 


Bytes 
Hex. 


00-OF 
10-17 
18 
18 


19-IB 
1C-1F 


20-21 
22-23 
24-26 
26-27 
28-2B 
2C-2F 


30-33 
34-37 


38-3B 
3C-3F 


40 


41 
42-43 
44-47 


48-4F 
50-57 
58~-5B 
| 5C-5F 
60-67 
68-6B 
6C-6F 


70 


71-73 
74-77 
78-78 
7C-7F 
) 80-97 


Label 





of Field 


MFSD? 
MFSA 
MFEA 
MFDT 


MFLK 
MFCB 
MFCT 
MFCM 
MFST 
MFLU 
MFCA 


MFXT 
MFLO 


MFHI 
MFSI 


MFLW 
MFOB 


MFRC 
MF#B 
MFRD 


MFCH 
MFDF 
MFLC 
MFTI 
MFTV 
MFRW 
MF ST 
MF$1 
MFED 
MFMB 


MFBB 
MFFB 
MFLB 


Description/Function 


Storage descriptor MCB 

Module address (MOOONNNN) 

Address of extension area 

Device type of file 

F = FBA device 

Extension area address 

Lockword 

Command control block 

Residual count 

Communication bytes 

Device status 

EXCP real plus LUB index (logical unit) 
CCW address 

CCW address in CSW 

Extent information 

Low limit (starting physical block 
number of extent) 

High limit (entering physical block 
number of extent) 

Default blocksize for FBA devices 
Reserved 

Locate control word 

Operation byte 

X'O1' = write data 

X'06' = read data 

Replication count 

Number of blocks to be processed 
Relative displacement 

(begin of extent-block processor) 
Channel program 

Define extent CCW 

Locate CCW 

TIC CCW 

Virtual address of buffer 

Read or write CCW 

Owner of this I/O request 

Saved register 1 of current request 
Extent description block 

Mask byte 


CO = Permit all write commands 
04 = Permit all diagnostic commands 
40 = Inhibit all write commands 
44 = Inhibit all write commands and 


permit all diagnostic commands 
Reserved, must be zero 
Physical address of first block of extent 
Relative displacement of first block of extent 
Relative displacement of last block of extent 
Reserved for alignment 
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NETWORK COMPOSER WORK AREA 


Definition Macro: 


IPWSDWC 


This work area is used by the composer to build records which it has received 
from the transmitter, into a transmission block. 


Bytes 
Hex. 


000-07F 
080-083 
084-087 
088-095 
088 
089-08B 
08C 
08D 


O8E-08F 
090-091 
092 
093 
094 
095 


096 


097 
098-09B 


09C-09F 
0A0-0A3 
0A4-0A7 


0A8-OAB 
OAC-OAD 


OAE 
OAF 


OBO-OB1 
OB2-0B3 


Label 





of Field 


NCWAHDR 
NCWTCB 
NCWAPUT 
NCWACOCO 
NCWARA 
NCWAGP 
NOWAG2 
NCWAGJHR 
NCWAGJTR 
NCWAGDHR 
NCWARL 
NCWARLM 
NCWART 
NCWAMLI 
NCWRCB 
NCWAIND 
NCWAFXD 
NCWANOCC 
NCWFLAGS 
NCWLSEG 
NCWSYSIN 
NCWSYSOU 
NCWNOCMP 
NCWASPR 


NCWFDSG 
NCWEXP 
NCWWPTR 
NCWNCROF 
NCWNCREA 
NCWSGPTR 


NCWSGC 
NCWSGLEN 


NCWRLTB 


NCW#BLNK 
NCWTBLEN 


Description/Function 


PLS dynamic data area 

Work area header 

Points to task control block 
Parameter area for PUT macro 
TCB comand code for current REC 
Address of record 

Copied TCB gen. purpose byte 
Copied TCB gen. purpose byte 2 
X'80' - Job header record 
X'40' - Job trailer record 
X'20' - Dataset header record 
Length of record 

Maximum record length 

Record type passed over 

MLI request 


RCB of task 

Various indications 

X'80' - Fixed format record indication 
X'40' - Record without carriage control 
Composer flag bits 

X'80' - Last segment indicator 

X'40' - Input record indicator 

X'20' - Output record indicator 

X'10' - Do not compress indicator 


- Spanned record indicators 
(indicates first/middle/last 
segment or UNSP) 


X'02' - First data segment indicator 
X'01' - Blank expansion indicator 
Reserved 


Points to first free byte in segment area work 
field 

Offset pointer into NCR 

Points to last byte of NCR 

Points to segment area NCWSGAR 

(initialized by transmitter) 

Segment counter 

Length of segment area 

(initialized by transmitter) 

Length of blank string to be added to current 
record 

Reserved 

Nr. of blanks to be expanded 

Length of NJE transmission block 


5. Data Areas 5-79 


Licensed Material - Property of IBM 


NETWORK COMPRESSION WORK AREA 


Definition Macro: 


IPWSDKA 


This work area is used by the compression routine when it is compressing records 


before building them into a transmission buffer. 


It is also used by the decom- 


pression routine when it decompresses buffers which it has received from the 


PNET driver. 


Bytes 
Hex. 


00-03 
04-07 
08-0B 
0C-0D 
OE-OF 
10-13 
14 


15 


16-17 
18-1B 
1C-1F 
20-21 
22-23 


Label 





of Field 


DKAINFA 
DKAINFEA 
DKAOUFA 
DKAOUFLN 
DKAOULN 
DKAOUFEA 
DKAREQ 
DKABCR 
DKABDCR 
DKASCR 
DKASDCR 
DKASNEEK 
DKASTAT 
DKASTATO 
DKAERRO1 
DKAERRO2 
DKAERRO3 
DKAERRO4 
DKAERROS 
DKAERRO6 
DKAERRO7 
DKAERRO9 
DKAERROA 


DKANSCB 
DKAINPOS 
DKAINFLN 
DKAREQL 


Description/Function 


Address of input field 

Input field end address 
Address of output field 
Length of output field 
Output string length 

Output field end address + 1 
Request byte 

X'00' - Compression BSC mode 


X'04' - Decompression BSC mode 
X'10' - Compression SNA mode 
X'14' - Decompression SNA mode 


X'18' - Decompression SNA (sneek-a-peek) 
Status byte 


X'00' - No error occurred 
X'01' - Output string exceeds output area 
X'02' - SCB error, length exceeds input area 


X'03' - Invalid request code 
X'04' - Length of input string <= 0 
X'05' - Length of output string <= 0 


X'06' - Invalid SCB encountered 

X'07' - SCB count = 0 

X'09' - Output length exceeds output area 
X'OA' - Decompression output area to small 
Reserved 


Pointer to start SCB(SNA obly) 
Points to next byte to be processed 


-Length of input field (string) 


SNA output buffer length 
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NETWORK DATA SET HEADER RECORD (DSH) 


Definition Macro: IPWSDNR DHR=YES 

The data set header record is a control record which is normally only present on 
output data sets (list or punch). It contains information relevant to the 
output, e.g. forms number, output class. A short form of the record, the record 
characteristics change section, may also be present on input jobs, if the record 
length of the data set is not 80 bytes. 


The layout of the first four bytes of every header record is identical. Bytes 0 
and 1 are the length of the entire block. Individual records must not be greater 
than 256 bytes long, so if the total record is longer it must be segmented. 

Byte 2 is a flag byte that is zero. Byte 3 is the transmission sequence indica- 
tor and is used to indicate that a header has been segmented. The high order bit 
(X'1... ....') indicates that there are more parts to come, and the other bits 
are a sequence counter of the blocks for this record. For example, if the head- 
er had to be split into three parts then the sequence indicators in the three 
blocks would be as follows:- X'80', X'81', and X'02'. 


The layout of the first four bytes of all sections is always identical. The sec- 
tion flags are to be found in the description of the job header record (refer to 
"Network Job Header Record (JHR)" on page 5-86). 


Bytes Label 

Hex. of Field Description/Function 

00-01 NDHLEN Length of entire block 

02 NDHFLAGS Flags 

03 NDHSEQ Transmission sequence indicator 
NDHLBCI Length of block control information 


* General section 


00-01 NDHGLEN Length of general section 

02-03 NDHGFLGS Section type flags 

02 NDHGTYPE X'00' - Identifier for general section 

03 NDHGMOD X'00' - Section modifier 

04-0B NDHGNODE Destination node name 

0C-13 NDHGRMT Destination remote name 

14-1B NDHGPROC Procedure invocation name 

10-23 NDHGSTEP Step name 

24-2B NDHGDD DD name 

2C-2D NDHGDSNO Data set number 

2E NDHGSEC Security level 

32F NDHGCLAS Output class (default 'A') 

30-33 NDHGNREC Record count 

34 NDHGFLG1 Flags 
NDHGF1SP X'80' - Spin data set (segmented) 
NDHGF 1HD X'40' - Hold data set at final destination 
NDHGF 1LG X'20' - Job log indicator 
NDHGF 10V X'10' - Page overflow indicator 
NDHGF1IN X'08' - Punch interpret indicator 

35 NDHGRCFM Record format 
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19 
1A 
1B 


1C-1D 
1E-1F 
20-23 
24-27 
28-2F 
30-73 


NDHPSYID 
NDHPNSEP 
NDHPOPTN 
NDHPCSUP 
NDHPPART 
NDHPCARD 


NDHPCOMP 
NDHPPASS 
NDHPSETP 
NDHPLLEN 


System identifier 

Number of job separator pages / cards 
Option byte 

X'20' - No separators between copies 
VSE/Advanced Functions partition identifier 
Number of cards or pages 

Reserved 

Compaction table name 

Data set password 

SETPRT parameter list 

Length of VSE/POWER section 


¢ VSE/POWER subsystem section (short form). This form is used only on input, 
whenever data is read from a IBM 3540 diskette device. 


05 
06-07 


NDHPCUU 
NDHPCLEN 


Reserved 
3540 cuu address 
Length of short version 


¢ Record Characteristics Change Section. This section is only used within an 
input data stream when the record length is not 80 bytes. 


NDHCLEN 

NDHCFLGS 
NDHCTYPE 
NDHCMOD 

NDHCFLG1 
NDHCRCFM 
NDHCLREC 
NDHCLLEN 


Length of Characteristics change section 
Section flags 

X'00' - Type for general section 

X'40' - Modifier for characteristics change 
Flags 

Record format 

Maximum record length 

Length of section 
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40-47 
48-4F 
50-57 
58-5F 
60-67 
68-6F 
70-77 
78-7F 
80-87 
88-8B 
8C-8F 
90-93 
94-97 
98-AB 
AC -B3 
B4-BB 
BC-C3 
C4-C7 


NJHGORGN 
NJHGORGR 
NJHGXEQN 
NJHGXEQU 
NJHGPRTN 
NJHGPRTR 
NJHGPUNN 
NJHGPUNR 
NJHGFORM 
NJHGICRD 
NJHGETIM 
NJHGELIN 
NJHGECRD 
NJHGPRGN 
NJHGROOM 
NJHGDEPT 
NJHGBLDG 
NJHGNREC 
NJHGLLEN 


Origin node name 

Origin remote name 

Execution node name 

Execution userid (VM/370) 
Default print node name 
Default print remote name 
Default punch node name 
Default punch remote name 

Job forms name 

Input card count 

Estimated execution time 
Estimated output lines 
Estimated output cards 
Programmers name 

Programmers room number 
Programmers department number 
Programmers building number 
Record count on output transmission 
Length of general section 


¢  VSE/POWER subsystem section 


00-01 
02-03 
02 


, Section type flags 


NJHPLEN 
NJHPFLGS 
NJHPTYPE 
NJHPMOD 
NJHPFLG1 
NJHPDISP 


NJHPSYID 
NJHPUSER 
NJHPLLEN 


Length of VSE/POWER subsystem section 
Section type flags 

X'86' - Id for VSE/POWER section 
X'00' - Modifier 

Flags 

Job disposition (default D) 

Reserved 

Target system identifier 

User information 

Length of VSE/POWER section 


These flags are used by other operating systems which could be present with- 
in the network. The layouts of the sections used by these systems can be 
found in the appropriate operating system manual. Because a subsystem 
appears in this list of section type flags does not mean that IBM supports 
this subsystem as part of the network. 


NTYPGEN 

NTYPSUB 

NTYPASP 

NTYPHASP 
NTYPJES1 
NTYPJES2 
NTYPJES3 
NTYPPOWR 
NTYPVNET 
NTYPUSER 


X'00' - General section 

X'80' - Subsystem section 

X'81' - ASP subsystem section 

X'82' - HASP sybsystem section 
X'83' - JES/RES subsystem section 
X'84' - JES2 subsystem section 
X'85' - JES3 subsystem section 
X'86' - VSE/POWER subsystem section 
X'87' - RSCS subsystem section 
X'CO' - User section 
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NETWORK PRESENTATION WORK AREA 


Definition Macro: 


IPWSDWP 


This work area is used by the receiver. Presentation services is responsible for 
taking a transmission block, de-compressing it and passing individual records to 
the receiver. 


Bytes 
Hex. 


000-07F 
080-083 
084 

085-087 
088-08B 
08C-08F 


090-093 
094-097 
098-09B 
09C-09D 
O9E-O9F 


0OA0~-0Al1 
0A2-0A3 
0A4-0A5 
0A6 


0A7 
0A8-ODF 
0EO-103 


Label 





of Field 


NPWDYNA 
NPWDSD 
NPWRC 


NPWBUPRO 
NPWRCDPT 


NPWHDRPT 
NPWPRBUF 
NPWALBUF 
NPWTRCL 

NPWFSGTL 


NPWPRBLN 
NPWALBLN 
NPWALUSE 
NPWLPREQ 
NPWSPAN 

NPWNXTSG 


NPWFSVE 
NPWDKA 


Description/Function 


PLS dynamic data area 

Little storage descriptor 

Return code presentation service 
Reserved 

Pointer to process buffer 

Address of physical record in normal or 
alternate pres. buffer 

Pointer to head accumulated RCD 

Pointer to presentation buffer 


Pointer to alternate pres. buffer 


Accumulated length of segments 

Total length of spanned record as indicated 
in first segment 

Length of presentation buffer 

Length of alternate pres. buffer 

Use count alternate buffer 

Reserved 

X'80' - REQ accumulate record segments 
X'40' - REQ accumulate header segments 
Reserved 

Function save area (implicit length definition) 
Decompression work area (impl. length def.) 
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154-157 
158-159 
15A-15B 
15C-15F 
160-163 
164-167 


168 
169-16B 


¢ Function work areas 


16C-1DB 
1DC-2DF 
2E0-423 
424 


NRUSRRCD 
NRUSRLEN 
NRUSRBLN 
NRUSRBUF 
NRRCDSAV 
NRSPLRTN 


NRPRSRCB 


NRACOUNT 
NRPWA 
NRCWA 
NRWAEND 


Pointer to user record 

Length user record 

Length intermediate data buffer 

Pointer to intermediate data buffer 

Pointer to saved current record 

Pointer to specific put data record routine 
(job input (SPLINP), job output (SPLOUT)) 
SRCB char preceding record 

Reserved 


Receiver account area 
Presentation work area 
Composer work area 

Start of presentation buffer 
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NODAL MESSAGE RECORD (NMR) 


Definition Macro: 


IPWSDNR NMR=YES 


The Nodal message record (NMR) is the record format used to transmit all mes- 
Sages and commands throughout the network. 


Bytes 
Hex. 


00 


01 


02 


03 
04-0C 
04-0B 


OD-14 
15-1D 
15-1C 


1E-A2 


Label 


of Field 


NMRFLAG 

NMRFLAGC 
NMRFLAGW 
NMRFLAGT 
NMRFLAGU 


NMRFLAGR 
NMRFLAGJ 
NMRFLAGD 
NMRFLAGS 
NMRLEVEL 
NMRPRIO 
NMRTYPE 
NMRTYPEX 
NMRTYPEF 
NMRTYPET 
NMRTYPE4 
NMRML 
NMRTO 
NMRTONOD 
NMRTOQUL 
NMROUT 
NMRFM 
NMRFMNOD 
NMRFMQUL 
NMRMSG 


Description/Function 


Flag byte 

X'80' = NMRMSG contains a command , 
X'40' - NMROUT has VSE/POWER remote number 
X'20' - NMROUT has a ICCF/CMS userid 

X'10' - NMROUT has UCMID information 


* The next four flag settings are 

* not used by VSE/POWER. 

X'08' - Console is only remote authorized 
X'04' - Console is not job authorized 
X'02' - Console is not device authorized 
X'01' - Console is not system authorized 


Importance level (high 4 bits) 
Output priority (low 4 bits) 

Type byte 

X'FO' - Reserved 

X'02' - Formatted command in NMRMSG 
X'04' - Message text only in NMRMSG 
X'08' - Message text contains control information 
Message length 

Target node 

Target node name 

Target node qualifier 

Local output information 

Originator node 

Originator node name 

Originator node qualifier 

Message 
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029 NCBTTSTQ Stop qualifier for NCBTTCS/NCBTTCE 
NCBPHALT X'80' - PNET halts node due to error 
NCBVHALT X'40' - VTAM requested node stop at EQJ (Z NET) 
NCBRHALT X'20' - Request by remote to terminate at EOJ 
02A-02B NCBCNRV Current number of active receivers 
02C-02D NCBCNTR Current number of active transmitters 
NCBMNRV 7 - Maximum number of receivers 
NCBMNTR 7 ~- Maximum number of transmitters 
O2E-02F Reserved 
¢ The following table defines the task entries for the command/message trans- 
mitter/receiver. 
030-037 NCBCONST Console transmitter task 
038-03F NCBCONSR Console receiver task 


¢ The following table defines the task entries for the transmitters 


040-077 


078-OAF 


NCBJTTB 


NCBOTTB 


Job transmitter table. This table has entries for upto 
seven transmitters, each entry being eight bytes long. 
Output transmitter table. This table has entries for 
upto seven transmitters, each entry being eight bytes 
long. 


e The following table defines the task entries for the receivers 


OBO-0OE7 
OE8-11F 
120-123 
124-127 
128-12B 


* Buffer control fields 


12C-12F 
130-133 
134-137 
138-13B 
13C-13F 
140-141 
142 

143 

144-145 
146-147 


NCBJRTB 
NCBORTB 
NCBMSGA 
NCBMSGT 


NCBNBFRQ 


NCBIFRE 
NCBOTBS 
NCBOBTL 
NCBLBFI 
NCBLBFO 
NCBBFSZ 
NCBMNIB 
NCBMNJB 
NCBNIBU 


Job receiver table 

Output receiver table 

Pointer to first message/command in queue 
Tail pointer for message/command queue 
Pointer buffer queue signon-on event 


Address of free input buffer queue 

Address of to-be-sent output buffer queue 

Tail pointer of to-be-sent output buffer queue 
Line driver buffer (BSC) 

Line driver buffer (BSC) 

Buffer size 

Maximum number of input buffers 

Maximum number of job/output transmission buffers 
Number of acquired input buffers 

Reserved 


e I/O manager and SEND/RECEIVE manager fields 


148-14B 
14C-14F 
150-153 
154-157 
158-159 
15A-15B 


| 15C-15F 


NCBIBUF 
NCBOBUF 
NCBCBFI 
NCBCBFO 
NCBRFCS 
NCBTFCS 


NCBPBFRQ 


Address of non-line input buffer (BSC) 
Address of non-line output buffer (BSC) 
Address of buffer for actual receive 
Address of buffer for actual send 
Remote held/released stream status 

New held/released stream status 

Head pointer to suspended buffer queue 
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170-173 
174-177 


178-17B 
17C-17F 
180-183 
184-187 
188-18B 
180-193 
194-197 
198 

199 


NCBCTCB1 
NCBCTCB2 


NCBDTCB 
NCBDECB 
NCBIFREX 
NCBOTBSX 
NCBOBTLX 


NCBWRKA 
NCBSGTE 
NCBRGTE 
NCBGTIPR 


® Session status 


19A 


19B 


19C 


19D 


19E 


NCBSFL1 
NCBF11 
NCBF12 
NCBF13 
NCBF14 
NCBF15 
NCBF16 
NCBSFL2 
NCBF21 
NCBF22 
NCBF23 
NCBF24 
NCBF25 
NCBF26 
NCBSEOK 
NCBF28 
NCBSFL3 


NCBSFL4 
NCBRSHTS 
NCBRSHTR 
NCBSEST 
NCBSSUB 
NCBSSTS 
NCBWSDT 
NCBSSSD 
NCBSSCL 
NCBSHTC 


Address of the TCB for connect task initiated by the 
local operator 

Address of the TCB for connect task initiated by the 
remote operator 

Address of disconnect session task TCB 

ECB of disconnect task 

Address of the 'receive-ahead' input buffer queue 
Address of the 'send-ahead' output buffer queue 

Tail pointer to the 'send-ahead' output buffer queue 
Reserved 

Address of the work area for compress/de-compress 
Gate for send 

Gate for receive 

X'FF' - Gate is in progress 


Primary application program 
X'80' - Primary in progress 
X'40' - Primary permit given 
X'20' - OPNDST in progress 
X'10' - OPNDST complete 

X'08' - Primary complete 
X'01' - Primary APPLID error 
Secondary application program 
X'80' - Secondary in progress 
X'40' - Secondary permit given 
X'20' - OPNSEC in progress 
X'10' - OPNSEC complete 

X'08' - Secondary complete 


X'04' - Session in progress 

X'02' - Session establishment complete 
X'01' - Secondary application program error 
Type of session 

X'00' - Primary half session 

X'FF' - Secondary half session 


Flag byte 4 

X'80' - RSHUTD sent 

X'40' - RSHUTD received 
Session status byte 

X'80' - UNBIND received 
X'40' - TERMSESS is waiting 
X'20' - Wait for SDT 

X'10' - SDT received 

X'08' - Clear received 
X'04' - Wait for SHUTC 


®* Continuation of common part 


1D4-1DB 
1DC-1E3 


NCBCPWD 
NCBCLPW 


e Account record 


Password for local node (outgoing) 
Password for line (outgoing) 
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NODE CONTROL BLOCK TASK ENTRY 


Bytes 


Hex. 


00 
01 


02 
03 


04-07 


Label 





of Field 


NCBERCB 
NCBEST1 
NCBTDRN 
NCBTLVE 
NCBDETE 
NCBTCRE 
NCBESTS 
NCBETYP 
NCBETYPT 
NCBETYPR 
NCBETYPC 
NCBETYPJ 
NCBETYPO 
NCBETCB 


Description/Function 


RCB of task concerned 

Status/action byte 

X'80' - Task drained 

X'40' - Task live 

X'20' - Dequeue & delete NCB task entry 
X'10' - Task creation requested 

Task stop state (duplicate to TCB field) 
Task type 

X'80' - Transmitter task 

X'40' - Receiver task 

X'20' - Console task 

X'08' - Job processing 

X'04' - Output processing 

TCB address of task concerned 


D3 


Data Areas 


2-99 


Licensed Material - Property of IBM 


14¢ 
14D 
14E 
14F 
150-157 


WESI 
WEMI 
WESN 
WEOD 
WEND 


¢ 3540 Volume 1 


80-83 
84-89 
8A 

8B-A4 
A5-B2 
B3-CA 


VOLL 
VLID 
VLSN 
VLAI 


VLDI 


VLPL 
VLRS 


VLST 


¢ 3540 Header 1 


80-83 
84 

85-8C 
8D-95 
96-9A 


HDRL 
HDID 


HDFI 
HDBL 
HDLO 
HDHI 
HDBI 
HDFS 
HDWP 
HDEI 
HDMV 
HDSN 
HDCR 


HDEX 
HDVI 


HDED 


Sequence ID (copy of PESI) 

Multivolume identification (copy of PEMI) 
Volume sequence number (copy of PESN) 

Number of opened diskettes (copy of PEOD) 
Number of diskettes to be read (copy of PEND) 
Not used 


label layout in label test area (OELB) 


Diskette volume 1 label 
Volume label ID and number 
Volume serial number 
Volume access indicator 
Reserved 

Volume owner identity 
Reserved 

Physical record length 
Physical record sequence code 
Reserved 

Label standard version (W) 


label layout in label test area (OELB) 


Diskette header 1 label 
Header label ID and number 
Reserved 

File identifier 

Reserved 

Block length of data record 
Reserved 

Begin of extent (CCHRR) 
Reserved 

End of extent (CCHRR) 
Reserved 

Bypass indicator (B) 

File security indicator (S) 
File write protection indicator (P) 
Basic exchange indicator ( ,E) 
Multivolume indicator ( ,C,L) 
Volume sequence number 
Creation date 

Reserved 

Expiration date 

Verify indicator ( ,V) 
Reserved 

End of data address (CCHRR) 
Reserved 
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PARTITION CONTROL BLOCK (PDB) 

Definition Macro: IPWSDPD 

A partition control block is dynamically created for each partition to be con- 
trolled by VSE/POWER. In addition to general partition information, the block 
contains an entry for each device that is to be spooled. The format of these 

entries is described by the IPWSDDE macro instruction. 

Note: The number of entries in the LST and PUN device entry sections of this 

block depend on the number specified in response to the message: 


1R86I PLEASE SPECIFY SPOOL DEVICES © 


after entering the PSTART command to start a partition. 





Bytes Label 

Hex. of Field Description/Function 

00-0F PSSD Storage descriptor (PDB) 

10-11 Reserved 

12-13 PDPI Partition identifier 

14-17 PDNE Number of entries 

18-1B PDCM Partition comreg address 

1C-1F PDPB PIB address 

20-23 PDPA First entry address 

24-27 PDBA Virtual begin address of related partition 
28-2B PDEA Virtual end address of related partition 
2C-2F PDRL Real begin address of related partition 
30-33 PDRH Real end address of related partition 
34°35 PDJIN LST/PUN job number indicators 

36 PDTT Termination code 

37 Not used 

38-3B PDJH Pointer to job header record 

3C-3F PDJT Pointer to job trailer record 


° Statistical information. This information is destined for the execution 
account record and there is a pointer to the SLI work area. 


40-43 PDSL Pointer to SLI work area 
44-47 PD#L Number of lines spooled 
48-4B PD#C Number of cards spooled 
4C-4D PD##P Number of pages spooled 
4E PDOC Default output class 

4F PDMT Multitasking indicator 


¢ 3540 spool device entry (same format as RDR device entry) 
50-5F PDER 3540 spool entry 
¢ RDR device entry (maximum = 1) 


60-63 PDPU Address of entry in the VSE/Advanced Functions 
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PHYSICAL DATA RECORD AREA (PDA) 


Space for this area is reserved during the execution of a physical reader/writer 
routine. The size of the area depends on the specifications in the DBLK parame- 
ter. It consists of a CCB and a CCW string which constitutes the channel pro- 
gram, followed by areas that contain the input or output data records. 


Note: For an RJE task the CCB and the channel program is in the LCB. During a 
read operation the area is initialized by calculating the amount of data records 
and their CCWs that will fit in the area. Then an SVC 0 is issued to commence 
the I/O operation to read cards or 80 byte records into it. When it is full, 
the data is transferred to the logical data area by the function IPWSPLR and is 
ready for output to the spooling device assigned as the data file. Queue 
records are constructed on the queue file to record the seek addresses of the 
data on the data file. 


During a write operation, the reverse occurs. Data is read from the spooling 
device to the LDA from where it is transferred to this PDA ready for the phys- 
ical routine to print or punch the data. 

Figure 5-26 to Figure 5-36 illustrate this relationship for an RJE task and for 


a local task. 


HOW TO LOCATE: Refer to Figure 6-2 in 6, "Diagnostic Aids." 
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3540 PHYSICAL WORK SPACE 
Definition Macro: IPWSDPW E3540=YES 


The 3540 physical work space is used to address and save the information neces- 
sary for diskette processing. The workspace is either reserved by the physical 
routine (IPWSSPR) in case of alternate diskette processing, by the process 
diskette record routine (IPWSSER) in case of primary diskette processing or by 
the logical reader routine (IPWSSLR) for dynamic * $$ RDR processing. The 
address of the 3540 physical workspace currently in use is stored in the TCB 
field 'TC3W'. 


Bytes Label 
Hex. of Field Description/Function 
00-03 PERA Real, address of the physical work space 
04-07 PEDI Device type indication. 
04 Reserved. 
05 PEDT Device type. 
06-07 PELU Programmer logical unit. 
08-0B PECU device address of diskette unit (' cuu') 
OC-OF PEHA address of higher level 3540 PWS 
10-1F PEDP Diskette parameters from PSTART. 
10-17 PEFI File identification. 
18-1B PEPS PSTART parameters. 
18 PEOP Option byte feed for 3540. 

PEFD X'O1' - Feed 3540 
19 PEND Number of diskettes to be read. 
1A PESC Sequence check required. 
1B PEVE Verify requested. 
1C-1F PECD Displacement between real and 

virtual CCB addresses. 

20-23 PECV Address of 3540 CCB or physical data area 
24-27 PEDV Virtual address of first 3540 data buffer 
28-2B PEDA Real address of first 3540 data buffer 
2C-2F PEVN Virtual address of second data buffer. 
30-33 PERN Real address of second data buffer. 
34-37 PEBS Real address of forced pre-SEEK CCW. 
38-3B PESK Seek address (OOCCHHRR). . 
3C-3F PESO Overlap seek address (OOCCHHRR). 
40-43 PELO Extent lower limit (OOCCHHRR). 
44-47 PEED Next sector address (OOCCHHRR). 
48-49 PERL Record length. 
4A-4B PENN No. of buffers allocated in 2nd data buffer. 
4C-4D PESI Sequence identification. 
4C PEMI Multivolume identification. 
4D PESN Volume sequence number. 
4E PEOC Open return code. 
4F PEOD Number of opened diskettes. 
50-57 PEDW Double word for conversion purposes. 
58 PESD Copy of device status byte from CCB 


HOW TO LOCATE: Refer to Figure 6-2 in 6, "Diagnostic Aids." 
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* Own node information 


84-8B PNCBONN Node name of own system 

8C PNCBONQ Qualifier for own system 

8D-94 PNCBNDTN Network definition table phase name 
95 PNCBAPPL Length of APPLID 

96-9D PNCBAPID APPLID of own node 

9E-B7 Reserved 


5% 


Data Areas 


5-109 


Licensed Material - Property of IBM 

QUEUE RECORD AREA (QRA) 

Definition Macro: IPWSDQR 

This area is used in conjunction with the auxiliary queue record area in the 
disk management block. Each task that processes a queue record acquires a QRA 
to contain the record. 


The format as it is printed in a dump is as follows. 


Refer to the Disk Management Block (DMB) auxiliary queue record area for a full- 
er description of the individual entries. 





Bytes Label 
Hex. of Field Description/Function 


¢ Body fields (first 136 bytes). Referenced by label QRBF. The body of the 
queue record contains information pertinent to this particular queue entry 
and the user job which created it. 


00-07 QRDY Date 

08-0B QRST Operation start time 

0C-OF QRET Operation end time 

10-1F QRUI User information 

20-27 QRNM Job name 

28-29 QRNO Job number 

2A QRQI Queue record identifier 

2B QRCN VSE/POWER cancel code 

2C QRRJ Line identifier or device type 
2D-2F QRCU Channel and unit (line address) 
30 QRFJ From terminal identifier 

31 QRTJ To terminal identifier 

32 QRCL Class 

33 QRPY Priority 

34-37 QRNR Record count 

38-39 QRNT Number of tracks 

3A QRSN Job suffix number 

3B QRNC Number of copies 

3C-3F QRFI Forms identifier 

40-43 QRNA Number of additional records 
44-45 QRNP Number of pages 

46-47 QRNE Number of extra pages 

48-4B QRLC Line/card counter 

4C-4F QRRR Restart page count 

50 QRCR Copies remaining 

51 QRDI Default disposition/purge flag 'P' 
52 QRDP Disposition 

53 QRSP Number of separators | 

54-57 QRBS Number of records before split 
58-5B QRBM Maximum value of count 

5C-5F : QRBN Additional count .value 

60-61 QRER Physical 3540 device address (packed) 
62-63 QRJI# Save job number for accounting 
64-67 QRCP Compaction table name 
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This determines the meaning of the fields QRNS, QRQP, and QRQN as shown 


in Figure 5-18 and Figure 5-19. 


fa 
|Label | | | 
| of | | | 
|Field |Field contains zero |Field does not contain zero | 


|QRNS |This queue record is the last |It is address of next queue | 
| |in this queue set. |lrecord in this queue set. 


{QRQP |Cannot be zero. |It is the address of the first | 
|queue record in this queue set. | 


|QRQN |Must be zero. |Must be zero. | 
ah en 


Figure 5-18. Queue Record is NOT First in Queue Set (QRFS = X'00') 


Eine sy gy Vip Poe eT ae ee ee a eg ee ee Ea ee ee ae ee rg a 
|Label | | | 
lof | : | 


|Field |Field contains zero Field does not contain zero | 


|QRNS |This queue record is last in |It is the address of the | 
|same queue set. |mext queue record in this queue| 
| | |set. | 


|QRQP |This queue record is the first |It is the address of the | 
| |in the first queue set in this |first queue record of the | 
| {class chain. [previous queue set. | 
QRQN |This queue record is the first |It is the address of the | 


| |queue record of the last queve |next queue set in this class | 
| |set in this class chain. |chain. 


Figure 5-19. Queue Record IS First in Queue Set (QRFS = X'01") 


HOW TO LOCATE: Refer to Figure 6-2 in 6, "Diagnostic Aids." 
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46 LCBLREQ Last sent request 
47 LCBREQF Request code for I/O monitor 
48~-4B LCBNEXT LCB chain pointer, last = zero 
4C-4F LCBRCPT Pointer to next record in buffer 
50-51 LCBPUBA Pointer to related PUB entry 
52-53 LCBLRCL Length of logical record 
54-55 LCBTIMC Time out count. This field contains the number of 
timeouts (1 every 3 seconds) as long as the 
terminal is idle (no data transfer). When 
information is transmitted on the line it is set 
to zero. The count is compared with the timeout 
limit specified in the PLINE macro. 
56 Not used 
57 LCBTOCT Count for:- 5 retries of Enable, Nop, Read 
response CCW sequence if line is in 
control state before trying to send 
ENQ. 
or:- 5 retries of Enable, Nop, Read 
response CCW sequence if line is in 
switched mode, not signed on, control 
state and timed out. 
58 LCBRTRY Retry count for unit check (max 30). If line is 
in data transfer mode and received unit check, 
it is reset at SYSREC writing. 
59 LCBMSGI Message index in virtual message queue 
5A LCBLIMO Line mode 
LCBMREC X'80' - Receive mode 
LCBMXMT X'40' - Transmit mode 
LCBDOUT X'20' - Discontinued output mode 
LCBTRDR X'08' - Reader task indicator 
LCBTOUT X'07' - Output task indicator 
LCBTLST X'04' - List task indicator 
LCBTPUN X'02' - Punch task indicator 
LCBTMSG X'01' - Message task indicator 

5B LCBOUSW LST/PUN output indicator 
LCBOUL1 X'80' - List output queued for LST1 
LCBOUP1 X'08' - Punch output queued for PUN1 

5C LCBACT Activity control byte 
LCBACTR X'80' - Task creation 
LCBASHD X'40' - Shutdown 
LCBATSTP X'20' - Task stop 
LCBASGF X'10' - Final signoff 
LCBALSTP X'08' - Line stop 
LCBALSTR X'04' - Line start 
LCBALIN X'02' - Line initialization 
LCBAKILL X'01' - Line stop (PSTOP cuu,KILL) 

5D LCBTRACE Line trace indication 
X'FF' - trace recording requested 

5E-5F LCBNORC Number of records in the buffer 

60-61 LCBMSG# Number of messages queued 

62 LCBSTMSG 3741 status message 

63 Not used 

64-7B LCBTQE Timer queue element 


Licensed Material - Property of IBM 


9A 


9B 


9C 


F5TNL 

F5EJECT 
F5SPACE 
F5T3741 
F5L2780 
LCBFLG1 


LF 1CHEND 


LF1TERM 
LF1RVIS 
LF1SIGN 
LF1SOMQ 


LF1TOMSG 


LF 1EOTR 
LCBFLG2 
LF2TIME 
LF 2MSOK 
LF2SENQ 
LF2BUSY 


LF2TOMSG 


LF2SFRC 
LCBFLG3 
LF3LSCN 
LF3SOFF 
LF3MR17 
LF3EOTR 
LF3EOTS 
LF 3TCRF 
LF3EODR 
LF3TEOJ 
LCBRCNT 


e BSC characters 


X'80' - New line character on end of HT 
X'20' - Eject before messages 
X'10' - Terminal requests space 3 after record. 


X'08' - Translate table with 3741 control 
X'04' - Terminal like 2780 

LCB 7s byte 1 

X'80' LCBSCAN called from channel end 


X'40' - Terminate session 

X'20' - RVI sent 

X'10' - Remote is signed on 

X'04' - Signoff message queued 

X'02' - Time-out message queued 

X'01' - EOT has been received for writer 
LCB Flag byte 2 

X'80' Timer is set 


X'20' - Sending of messages disabled 
X'10' - ENQ to be sent 


X'08' - Line busy indication 

X'02' - Time-out message to be sent 
X'O1' - Forms change in progress 
LCB flag byte 3 

X'80' - Trace entry for activity 


X'40' - Signoff read by BSC reader 
X'20' - Message 1R17I already queued 


X'10' - EOT has been received for reader 

X'08' - EOT to send in order to reset terminal 
X'04' - Task creation failed 

X'02' - Write end-of-day record 

X'O1' - Turnaround indication 


Retry count 


9E MBSCSOH SOH BSC character 

oF MBSCENQ ENQ BSC character 

AO MDLESTX Start of text sequence 

Al MBSCSTX STX BSC character 

A2 METBSEQ End of block sequence 

A3 MBSCETB ETB BSC character 

A4 METXSEQ End of text sequence 

A5 MBSCETX ETX BSC character 

A6 MACKOSEQ Even acknowledgement sequence 

A7 MBSCACKO Even acknowledgement character 

A8& MACK1SEQ Odd acknowledgement sequence 

A9 MBSCACK1 Odd acknowledgement character 

AA MNAKSEQ Negative acknowledgement sequence 
AB MBSCNAK Negative acknowledgement character 
AC MBSCACKX Acknowledgement conversion character 
AD MBSCCWCH CCW chaining character 

AE MWACKSEQ WACK sequence 

AF MBSCWACK WACK BSC character 

BO MEOTSEQ DLE-EOT sequence 

Bl MBSCEOT EOT BSC character 

B2-B3 MDLEETB DLE-ETB sequence 


128-12B DCT1LID 
12C-12F DCT1LTCB 
130 DCT1LST1 
131 DCT1LST2 
132 DCT1LST3 
133 DCT1LIDI 
134-137 DCT1LCLS 
138-139 DCT1ILPLN 
13A DCT1LNRC 
13B DCT1LIDH 
13C DCT1LSCT 
13D DCT1LCSC 
13E-141 DCT1LFRM 
142 DCT1LPRC 
143 

¢ Punch DCT 

144-147 DCT1PID 
148-14B DCT1PTCB 
14C DCT1PST1 
14D DCT1PST2 
14E DCT1PST3 
14F DCTIPIDI 
150-153 DCT1PCLS 
154-155 DCT1PPLN 
156 DCT1PNRC 
157 DCTIPIDH 
158 DCT1PSCT 
159 DCT1IPCSC 
15A-15D DCT1PFRM 
15E DCT1PPRC 
15F 


¢ Message task DCT 


160-163 
164-167 
168 
169 
16A 
16B 
16C-16F 
170-171 
172 
173 
174 
175 
176-179 
17A 
17B 


DCT1MID 

DCT1MTCB 
DCT1IMST1 
DCTIMST2 
DCTIMST3 


DCT1IMCLS 
DCT1MPLN 
DCT1MNRC 


DCTIMSCT 
DCTIMCSC 


DCT1IMPRC 


e Reader DCT 
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List task identifier (1LST) 
TCB address of task 

Status byte 1 (see Input DCT) 
Status byte 2 (see Input DCT) 
Status byte 3 (see Input DCT) 
Hex identifier ( as LCBOUSW) 
List classes 

Length of one print line 
Number of records / buffer 
Hex identifier (inv. LCBOUSW) 
Space 3 line count 

Component select character 
Forms identifier 

Previous command code 
Reserved 


PUNCH task identifier (1PUN) 
TCB address of task 

Status byte 1 (see Input DCT) 
Status byte 2 (see Input DCT) 
Status byte 3 (see Input DCT) 
Hex identifier ( as LCBOUSW) 
Punch classes 

Length of one punch line 
Number of records / buffer 
Hex identifier (inv. LCBOUSW) 
Space 3 line count 

Component select character 
Forms identifier 

Previous command code 
Reserved 


MSG task identifier (1MSG) 
TCB address of task 

Status byte 1 (see Input DCT) 
Status byte 2 (see Input DCT) 
Status byte 3 (see Input DCT) 
Reserved 

N/A 

Length of one print line 
Number of records / buffer 
N/A 

Space 3 line count 

Component select character 
Not used 

Previous command code 
Reserved 
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SERVICE REQUEST BLOCK (SRB) 


Definition Macro: 


IPWSDSR 


A service request block is created whenever a service + request is passed to 
asynchronous service for processing. 


During the time asynchronous service is performing the service request, the 
SRBs are chained together. 


Asynchronous service handles the request on a 'first-in, first-out' basis. 


Bytes 
Hex. 


00-03 
04 


05 


06-07 
08-0B 


OC~-17 


Label 
of Field 


SRBNEXT 
SRBREQ 
SRBSPR 
SRBLD 
SRBFT 
SRBFCB 
SRBIDR 
SRBFND 
SRBNTE 
SRBPNT 
SRBGRC 
SRBDIS 
SRBTRC 
SRBPNF 
SRBPTL 


SRBECB 


SRBPARM 


¢ SETPRT request 


0C-OF 
10-17 


e Load request 


0C-OF 
10-13 
14-17 


SRBAPN 
SRBLDA 
SRBPSZ 


Description/Function 


Address of next SRB in chain 

Request type 

C'S' - SETPRT request (SRBSPR) 

- Load request 

- Fetch and invoke B transient 

- Load FCB request (SRBFT) 

- Trace logging request 

- Find member request (LIB) 

- Note member request (LIB) 

- Point request (LIB) 

- Get record request (LIB) 

- Disconnect member request (LIB) 

Return code (low-order byte of R15) 

X'04' - Phase not found 

X'08' - Phase too large 

Reserved 

Event control block (VSE/POWER task, issuing 
service request, waits on this ECB, which is 
posted by the service subtask). 

Request parameter list: This field is broken 
down differently for each service request type: 


UA UZOHw 


aQagrAaaarganadgnaa 


Address of SETPRT parameter list 
Reserved for future use 


Address of the phase name 
Address where to load the phase 
Size of phase in bytes 


e Trace logging services 


0C-OF 
10-13 
14-17 


SRBTSA 
SRBTEA 


Trace start address 
Trace end address 
Reserved for future use 
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SNA SESSION CONTROL BLOCK FOR PNET (SSCB) 
Definition Macro: IPWSDSS 

A SNA session control block is created is a SNA session is established to 


another node in the network. The SSCB is anchored to the appropriate node 
control block (NCB). 





Bytes Label 
Hex. of Field Description/Function 
00-0F SSCBSD Storage descriptor 


°e Function save areas 


10-3F 
40-6F 


SSCBFUSS 
SSCBFUSR 


Function save area for SEND exit 
Function save area for RECEIVE exit 


e Save areas for VTAM macro calls 


70-73 SSCBLS13 Reg 13 save area on SEND, PNET Driver 
74-BB SSCBVSS1 Save area used for SEND macro 

BC-BF SSCBES13 Reg 13 save area on SEND, SEND EXIT 
C0-107 SSCBVSS2 Save area used for CHECK/SEND, SEND EXIT 
108-10B SSCBLR13 Caller's reg 13 save area if RECEIVE 
10C-153 SSCBVSR1 Save area used for RECEIVE macro 
154-157 SSCBER13 Caller's reg 13 save area, RECEIVE EXIT 
158-19F _ SSCBVSR2 Save area used for RECEIVE macro, RECEIVE exit 
1A0-1E7 SSCBVDSA Save area used by disconnect task 
1E8-1EB SSCBR14S VTAM return address, SEND exit 

1EC-1EF SSCBR14R VTAM return address, RECEIVE exit 

e Save area for individual addresses/pointers 

1F0-1F3 SSCBSRQE Connect SRQE address 

1F4-1F7 SSCBNCB Connect Node control block address 
1F8-1FB SSCBS2P Connect save area PAP 

1FC-1iFF SSCBS2S Connect save area SAP 

200-203 SSCBS3 Disconnect save area 

204-267 SSCBSRPL RPL skeleton 

268-2A7 SSCBNIB NIB skeleton 

e BIND image and FM-Headers 

2A8-2CB SSCBBIND Bind RU 

2CC-2D3 SSCBFMHO FM header (output) 

2D4-2DB SSCBFMHI FM header (input) 


5. Data Areas 5-127 


Licensed Material - Property of IBM 


e Restart information 


5C-5F LURS Restart 
5¢ LURX Restart function index 
5D-5F LURP Restart page count 


¢ List and punch characteristics 


60-63 LUPH Pointer to device in SUCB 
64 LULO List output support 
X'80' - ASCII 
X'40' - Compression 
X'20' - Transparency 
X'10' - Spanning 
X'08' - Inter-record separator 
X'04' - Xlation of characters below blank 
X'O1' - Compaction 
65 LUPO Punch output support 
X'80' - ASCII 
X'40' - Compression 
X'20' - Transparency 
X'10' - Spanning 
X'08' - Inter-record separator 
X'O1' - Compaction 
66 LUPD PDIR information byte 
X'80' - PDIR outbound allowed 
67 LUAD Card/document flow 


X'80' - Card inbound allowed 
X'40' - Card outbound allowed 


X'20' - Basic exchange media allowed 
X'08' - Document inbound allowed 
X'04' - Document outbound allowed 
LUOC Current compaction table in use by 
outbound processor 
68-6B LUO1 Compaction table name 
6C-6F LUO2 Pointer to COCB entry 


¢ Process control section. Referred by label LUTC. 


70-73 LURT RDR, LGN, LGF TCB address 
74-77 LULT LST, PUN TCB address 
78-7B LUMT Message TCB address 
7C-7F LUTI RDR2 TCB address 
80-83 LUTH LGH TCB address 
84 LUA1 Action byte 
X'80' - Request logon 
X'40' - Request start reader 
X'20' - Request interrupt LST/PUN on 
signal 


X'10' - Request interrupt LST/PUN for 
outbound message 


X'08' - Request interrupt inbound for 
inbound 
X'04' - Request stop session 
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SNA LOGON REQUEST CONTROL BLOCK (LRCB) 
Definition Macro: IPWSDLR 
A LOGON request control block contains information for 6 LOGON requests to 
the VSE/POWER application. All LOGON request control blocks are chained. 
The pointer to the first LRCB is contained in the SNA control block (SNCB). 
Information about LOGON requests are stored in the LRCB by the LOGON exit of 
the SNA manager. The LOGON processor processes the LOGON requests to build 
SUCB/LUCBs. 


The format of a LOGON request control block is as follows. 


Bytes Label 

Hex. of Field Description/Function 

00-0F LRSD Storage descriptor (LRCB) 
10-13 LRNX Pointer to next LRCB 

14-17 Reserved 

18 LRLC Length of one LRCB 

19 LRLB Length of one LRUB 

1A LRAL No. of total LRUBs in LRCB 
1B . LRUS No. of active LRUBs in LRCB 
1C-1F Reserved 

20-7F LRAU Space for six LRUBs 

20-2F First LRUB entry 

20-23 LRAC ACB address 

24-2B LRLU LU-name 

2C LRST Status (X'01' indicates active entry) 
2D-2F LRLM Length of LOGON message 
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SNA SESSION REQUEST QUEUE (SRQE) 


Definition Macro: IPWSDRQ 





Bytes Label 

Hex. of Field Description/Function 
000-00F SRQESD Section descriptor 

010-011 SRQETLGF SRQE length (multiple 128) 
012-013 Reserved 

014-017 SRQENPTR Next in chain pointer 
018-01B SRQETPTR Task pointer belonging to 
01C-01F SRQEANCB Address of node control block 
020-021 SRQEALEN Actual length of BIND-RU 

° Status: 

022 SRQESTA SRQE status byte 

023 SRQERC Reason code used in NSEXIT 
024-025 SRQESSMO Sense modifier 


¢ This part will contain the BIND-RU 


026-049 SRQEBDRU Reserved for BIND-RU 
026-03F SRQEBIND BIND-RU area 

040 SRQEPLUL PLU-name length 
041-048 SRQEPLU PLU-name 

049 


¢ This part contains the ACF/VTAM emergency save area 


04A-04B Unused 

04C-093 SRQESAVE Reserved for VTAM save area 
094-097 SRQESR13 Save reg. 13, if VTAM-macro 
098-098 Reserved 


* This part contains the RPL after a BIND-RU has been received 
09C-OFF SRQERPL RPL area 
* This part contains the NIB after a BIND-RU has been received 


100-13F SRQENIB NIB area 
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59-5B 
5C-5F 
60-63 
64-67 
68 

69-6B 
6C-6F 
70-73 
74-77 
78 

79-7B 
7C-7F 
80-83 
84-87 
88 

89-8B 
8C-8F 
90-93 
94 

95-96 
97 


SUP1L 
SUP1F 
SUP1C 
SUR1P 
SUR1S 
SUR1L 
SURIF 
SURI1C 
SUX1P 
SUX18 
SUX1L 
SUX1F 
SUX1C 
SUC1P 
SUC1S 
SUC1L 
SUC1C 
SUC1C 
SUHD 


SUDLS 


Pointer to LUCB 

Forms ID 

Punch output classes 

Reader - C'RDR1' 

Device status 

Pointer to LUCB 

Forms ID (not used by reader) . 

Reader class - C'A' (initialized by IPWS$$IB) 
Exchange media reader - '‘RDR2' 

Device status 

Pointer to LUCB 

Forms ID (not used by reader) 

Reader class - C'A' (initialized by IPWS$IB) 
Console - C'CON1' 

Device status 

Pointer to LUCB 

Forms ID (not used by console) 

Console class - C'A' (initialized by IPWS$IB) 
Device List delimiter 

Reserved 

Device select indicator 


¢ Compaction table information for outbound (referred to bu SOOC) 


98-9B 
9C-9F 
AO 


sU01 
SU02 
SUAD 


Name of default table 

Address of default table virtual 
Card/document flow 

X'80' - Card inbound allowed 
X'40' - Card outbound allowed 
X'08' - Document inbound allowed 
X'04' - Document outbound allowed 


e Message control section 


Al 


SUMR 


SUMRL 


SUMN 
SUMC 
SUMD 
SUTY 
SUTF 


e Miscellaneous 


Message request status 

X'80' - Message processor for work 
station is active 

X'40' - Request to interrupt IPWSSOB 
for outbound message was issued 

Pointer to the LUCB with the 

suspending IPWSSOB 

Unused 

No. of messages 

Subchain index 

Temporary delete chain index 

Terminal type 

Terminal features 

X'80' - Console specified 
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SOURCE LIBRARY WORK AREA 
Definition Macro: IPWSDSL SLWA=YES 
This work space is reserved and used by phase IPWSSSL and provides storage 


to read records from a source statement library. The work space is anchored 
to the partition control block of the partition concerned. 





Bytes Label 
Hex. of Field Description/Function 
000-00F SLWASD Storage descriptor 


¢ Communication switches 


010 SLRS Read SSL switch 
C'R' - Read request 
011 SLRR Read RDR switch 


C'R' - Read request 
C'I' - Ignore RDR record 


012 SLF1 Flag byte 1 
SLEOM X'80' - End of member 
013 Reserved for future use 


* Buffer control information 


014-017 SLCREC Current record address 
018-01B SLLREC Address of last REC in buffer 

SLRLEN 80 - SSL record length 
01C-33B SLRBUF Buffer area 


® Pointers and save areas 


33C-33F SLAPDB Address of partition control block 
340-343 SLASRB Address of service request block 
344-347 SLSLME Address of current SL-member element 
348-34B SLIBUF Address of ICCF process buffer 
34C-383 SLSAVA Save area used by ASYN SERV 

384-387 SLDALN Data name length save area 


* RPL and buffer used by librarian 


388-407 SLRPL Request parameter list area 
408- SLBUF Process buffer area 
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STORAGE CONTROL BLOCK (SCB) 
Definition Macro: IPWSDSC 
The storage control block is used to control access to the storage manage- 


ment routines and to allocate storage pages as required by the routines. 
The format of the storage control block is as follows. 





Bytes Label 

Hex. of Field Description/Function 

000-00F SCSD Storage descriptor 

010-013 SCLP Last permanent page 

014-017 SCFP First fixed page 

018-01B SCEB Event control block 

01C-01F SCLK Lockword 

020-023 SCRE Task register 14 

024-027 SCRF Task register 15 

028-02B SCRO Task register 0 

02C-02F SCR1 Task register 1 

030-033 SCR2 Task register 2 

034-037 SCR3 Task register 3 

038-03B SCR4 Task register 4 

03C-03F SCR5 Task register 5 

040-13F SCBT Storage assignment table 

140-147 SCFB Constant to initialize the first BCW 
in a new fixed page in the fixable area. 

148-14F SCLB Constant to initialize the last BCW 
in a new fixed page in the fixable area. 

150-15B SCPF Page fix/free work area 

150-153 Page virtual address 

154-157 Page length (-1) 

158-15B End-of-list indicator (X'FF000000') 

15C-15F Reserved 


1. Since the storage management routines are used to provide register save 
areas for task use, the storage control block must contain a register 
save area for use by the storage management routines. 


2. The storage assignment table is like a map of the fixable area within 
the VSE/POWER address space in which each page control byte represents a 
single page of address space. Each byte within the table takes one of 
four values. 

X'00' Page free (and not last page) 

X'40' Page free (and last page) 

X'80' Page in use (but not last page) 

X'CO' Page in use (and last page). 

The storage assignment table is defined with all pages free and is prop- 

erly initialized by the VSE/POWER start-up routines to reflect the 

amount of real storage available to the VSE/POWER partition at that 
time. 
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TAPE CONTROL BLOCK (TBB) 
Definition Macro: IPWSDTB 
This control block dynamically created to satisfy requirements of VSE/POWER 
tasks utilizing tape as intermediate storage. Its format as it is printed 


in a dump is as follows. 


The IPWSDTB macro is issued by VSE/POWER phases IPWSSOF, IPWSSOT and 





IPWSSSY. 
Bytes Label 
Hex. of Field Description/Function 
TBDS Define dummy section 
00-03 TBSD Storage descriptor 'TBB' 
04-07 TBPB Physical unit block address 
08 TBFU Function control byte 
FOUT X'01' Output processing 
FINP X'02' Input processing 
FCON X'10' Continuation requested 
FCLT X'20' Close tape request 
FOPT X'40' Open tape request 
FBTB X'80' Build TBB request 
09 TBFG TBB flag byte: 
TIWA X'01' temporary work area available 
TMFI X'02' multi-file volume 
TMVF X'04' multi-volume file 
TUNL X'08' unlabeled tape 
TBLK X'10' blocked data 
TDMD X'20' data mode, no label 
TEOV X'40' EOV indicated 
TEOF X'80' EOF indicated 
OA TBDM Default mode setting, loaded from PUB 
OB TBSM Specified mode setting, given in operator command 
oc TBDT Device identifier 'T' for 'tape' 
OD-OF TBCU Physical unit number 'cuu', which is 
given in the operator command 
10-1F TBCB Command control block 
10-11 TBRS Residual count 
12-13 TBCM Communication bytes 
14 TBCS Channel and device status 
15 TBC1 Channel and device status 
16-17 TBLU EXCP real plus LUB index 
18-1B TBCA CCW address if it is a SYSIN tape RDR task then 
this field points to a start of I/O area (TBAV) 
1C-1F None CCW address in CSW 
20-27 TBCW Channed command word 
20 TBCC Write command code X'01' 
21-23 TBRA Address of data area 
24-25 TBWS CCW flag bytes 
26-27 TBCT Count field, initialized by '1' 
TLNC CCW length = addr (TBCT-TBCW) 
28-38 TBLA File label save area in form 'Label.......... ; 
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SOURCE LIBRARY WORK AREA 
Definition Macro: IPWSDSL SLWA=YES 
This work space is reserved and used by phase IPWSSSL and provides storage 


to read records from a source statement library. The work space is anchored 
to the partition control block of the partition concerned. 





Bytes Label 
Hex. of Field Description/Function 
000-00F SLWASD Storage descriptor 


* Communication switches 


010 SLRS Read SSL switch 
C'R' - Read request 
011 SLRR Read RDR switch 


C'R' - Read request 
C'I' - Ignore RDR record 


012 SLF1 Flag byte 1 
SLEOM X'80' - End of member 
013 Reserved for future use 


¢ Buffer control information 


014-017 SLCREC Current record address 
018-018 SLLREC Address of last REC in buffer 

SLRLEN 80 - SSL record length 
01C-33B SLRBUF Buffer area 


e Pointers and save areas 


33C-33F SLAPDB Address of partition control block 
340-343 SLASRB Address of service request block 
344-347 SLSLME Address of current SL-member element 
348-34B SLIBUF Address of ICCF process buffer 
34C-383 SLSAVA Save area used by ASYN SERV 

384-387 SLDALN Data name length save area 


* RPL and buffer used by librarian 


388-407 SLRPL Request parameter list area 
408- SLBUF Process buffer area 
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1F 


20 


21 


22 


23 


4C 


SPNR 
SPLR 
SPFR 


SPER2 
SPAI 
SPME 
SPR1 
SPEJ 


SPR2 
SPRP 
SPRD 
SPRC 
SPRJ 
SPCX 
SPSC 
SPST 
SPPC 
SPR3 
SPLD 
SPPO 
SPBR 
SPCO 
SPBG 
SPR4 
SPOO 
SPQR 
SPXR 
SPXL 
SPCB 
SPPB 
SPMO 


SPBL 
SPRL 
SPRS 
SPSN 
SPCT 
SPCL 
SPDP 
SPCC 
SPSQ 


SPQD 


X'00' - Normal return 

X'08' - End-of-data on GETSPOOL 

X'09' - Warning: Task had to wait for Queue/ 
Account File space. 

Error-feedback byte 2 

X'80' - Access inhibited (wrong password) 

X'O1' - Multiple Queue entries found 

PUTSPOOL request type 

X'40' - The last data record for internal 
reader job is contained in this 
PUTSPOOL request 

CTLSPOOL request type 

X'01' - Route to new priority 


X'02' - Route to new disposition 
X'04' - Route to new class 
X'08' - Route to new remote ID 


X'10' - Cancel from RDR queue 

X'20' - Scratch from LST queue 
X'40' - Display job status 

X'80' - User-supplied POWER command 
GETSPOOL request type 

X'O1' - GETSPOOL request 


X'02' - Position on Q-record 
X'04' - Position on line number 
X'08' - Return control characters 


X'10' - Buffered GETSPOOL 

CTLSPOOL request-byte 2 

X'80' - Spool queue display 

X'20' - Queue lookup request 

PUTSPOOL user's XECB name 

GETSPOOL/CTLSPOOL user's XECB name 

Address current PUTSPOOL buffer area 

Address user-supplied buffer area for VSE/POWER 

X'1C' - Message displacement in 
buffer from byte 0 

Data buffer area length 

Data record length 

Browse control 

Signed browse start control 

Browse start line number 

LST output class 

LST output disposition 

Print/POWER control character 

Display job status return 

C'N' - Not on VSE/POWER queues 

C'R' - On RDR queue 

L - On LST queue 

P' - On PUN queue 

X - On XMT queue 

b disposition on RDR/LST queue 


c' t 
C' t 
Cc! t 
Jo 
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STORAGE CONTROL BLOCK (SCB) 
Definition Macro: IPWSDSC 
The storage control block is used to control access to the storage manage- 


ment routines and to allocate storage pages as required by the routines. 
The format of the storage control block is as follows. 





Bytes Label 

Hex. of Field Description/Function 

000-00F SCSD Storage descriptor 

010-013 SCLP Last permanent page 

014-017 SCFP First fixed page 

018-01B SCEB Event control block 

01C-0O1F SCLK Lockword 

020-023 SCRE Task register 14 

024-027 SCRF Task register 15 

028~-02B SCRO Task register 0 

02C-02F SCR1 Task register 1 

030-033 SCR2 Task register 2 

034-037 SCR3 Task register 3 

038-03B SCR4 Task register 4 

03C-03F SCR5 Task register 5 

040-13F SCBT Storage assignment table 

140-147 SCFB Constant to initialize the first BCW 
in a new fixed page in the fixable area. 

148-14F SCLB Constant to initialize the last BCW 
in a new fixed page in the fixable area. 

150-15B SCPF Page fix/free work area 

150-153 Page virtual address 

154-157 Page length (-1) 

158-15B End-of-list indicator (X'FF000000') 

15C-15F Reserved 


1. Since the storage management routines are used to provide register save 
areas for task use, the storage control block must contain a register 
save area for use by the storage management routines. 


2. The storage assignment table is like a map of the fixable area within 
the VSE/POWER address space in which each page control byte represents a 
single page of address space. Each byte within the table takes one of 
four values. 


X'00' Page free (and not last page) 
X'40' Page free (and last page) 

X'80' Page in use (but not last page) 
X'CO' Page in use (and last page). 


The storage assignment table is defined with all pages free and is prop- 
erly initialized by the VSE/POWER start-up routines to reflect the 
amount of real storage available to the VSE/POWER partition at that 
time. 
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TAPE CONTROL BLOCK (TBB) 
Definition Macro: IPWSDTB 
This control block dynamically created to satisfy requirements of VSE/POWER 
tasks utilizing tape as intermediate storage. Its format as it is printed 


in a dump is as follows. 


The IPWSDTB macro is issued by VSE/POWER phases IPWSSOF, IPWSSOT and 





IPWSSSY. 
Bytes Label 
Hex. of Field Description/Function 
TBDS Define dummy section 
00-03 TBSD Storage descriptor 'TBB' 
04-07 TBPB Physical unit block address 
08 TBFU Function control byte 
FOUT X'01' Output processing 
FINP X'02' Input processing 
FCON X'10' Continuation requested 
FCLT X'20' Close tape request 
FOPT X'40' Open tape request 
FBTB X'80' Build TBB request 
09 TBFG TBB flag byte: 
TTWA X'O1' temporary work area available 
TMFI X'02' multi-file volume 
TMVF X'04' multi-volume file 
TUNL X'08' unlabeled tape 
TBLK X'10' blocked data 
TDMD X'20' data mode, no label 
TEOV X'40' EOV indicated 
TEOF X'80' EOF indicated 
OA TBDM Default mode setting, loaded from PUB 
OB TBSM Specified mode setting, given in operator command 
oc TBDT Device identifier 'T' for ‘tape’ 
OD-OF TBCU Physical unit number 'cuu', which is 
given in the operator command 
10-1F TBCB Command control block 
10-11 TBRS Residual count 
12-13 TBCM Communication bytes 
14 TBCS Channel and device status 
15 TBC1 Channel and device status 
16-17 TBLU EXCP real plus LUB index 
18-1B TBCA CCW address if it is a SYSIN tape RDR task then 
this field points to a start of I/O area (TBAV) 
1C-1F None CCW address in CSW 
20-27 TBCW Channed command word 
20 © TBCC Write command code X'01' 
2125 TBRA Address of data area 
24-25 TBWS CCW flag bytes 
26-27 TBCT Count field, initialized by '1' 
TLNC CCW length = addr (TBCT-TBCW) 
28-38 TBLA File label save area in form 'Label.......... ; 
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TASK CONTROL BLOCK (TCB) 
Definition Macro: IPWSDTC 


Each VSE/POWER task is equipped with a task control block which is created 
in fixed storage and is used to establish the identity of the task and to 
preserve its status when it is not in active control of the central process- 
or. 


The TCB is divided into the following main areas: 


e Task management fields 
° Task register save area 
e General task workarea. 


When the TCB belongs to a command processor task, the general task work area 
is replaced by command processor control fields. When it belongs to a BSC 
line manager task, these fields are replaced by BSC line manager control 
fields. Refer to the relevant paragraphs in this section, "Command Processor 
Control Block" and "BSC Line Manager TCB Fields”. 


TCB Task Management Fields 





Bytes Label 
Hex. of Field Description/Function 
00-OF TCSD Storage descriptor 
00-03 TCBI Storage descriptor block ID C'TCB ' 
04-07 TCTI Task ID C' TSK' 
C'O CP' - command processor task 
C'I IT’ - initiator task 


C'T TT' - terminator task 

C'T TI' - timer task 

C'RRDR' - local reader task 

C'WLST' - local printer task 

C'WPUN' - local punch task 

C'E xX' ~- Execution processor task.xx specifies the 
partition requesting the task. 

c'1' - C'5 ' TCB belongs to an RJE task. In this 
case the three remaining bytes will indicate the 
type of task. (RDR, LST, PUN, LGN, LGF, or MSG.) 
C'LRLM' - line manager task 

C'P PS' - print status task 

C' ACT' - account task 


C'J ' = spool manager task. The three remaining 
bytes indicating the type of task. (RDR, LST, or 
SPM. ) 


C'LSNA' - SNA task 

C'NTFY' - notify task 

C'LLDR' - line driver 

C'NRVn' - network receiver task n (n=blank for con- 
sole task) 
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Task States Char. Task Condition Routine 
Not I Task is inactive TM10 
dispatchable P Page fault in proces T10 

0 Waiting for operator response TM10 
Conditionally L Waiting for locked resource TM30 
dispatchable M Wait on multiple CCB or ECB posting TM50 

Q As for M state, except event 

may never occur 
C Wait on single CCB or ECB posting 
Ss As for C state, except event 


may never occur 
Wait on RJE,BSC or networking event TMBO 
Dispatch task immediately TM90 


ow 


Immediately 
dispatchable 


Running R Task is running N/A 
Partition wait W Waiting for dispatch from supervisor TM20 


20-30 TCCT Task class list (plus a 1-byte field of X'FF'). Up 
to four different classes can be specified 
simultaneously for any task, except RDR task. For 
each class identifying character an entry is made 
in the TCCT field in the TCB for that task. The 
first byte of each entry contains the class, and 
the remaining three bytes contain an address of an 
ECB in the master class table area (in DMB). The 
task class list is shown in Figure 5-20. 

TC##C Number of class entries. 


¢ Fields used by spool management task 


24 One class for spool-mgmt-lst delimiter 
25-27 TCEWA Address of work space for EXTRACT 
28 TCIQ Spool-mgmt queue id 
29 Not used 
2A TCSG Spool-mgmt general-purpose byte 

TC1T X'02' - 1st time buffered GETSPOOL 

X'01' - GETSPOOL DASD short on storage message 

2B TCSS Spool mgmt switch 

TCIW C'I' - logical writer initialized 

TCOW C'O' - OPEN logical writer 

TCCW X'C' - CLOSE logical writer 

2C-2F TCER Address of user cross-partition (XECB) 


¢ Termination types and function trace indicators 


31 TCTT Termination type 


TT40 b - Normal, - continue execution 
TTCU U - Unrecoverable I/O error 
TTCX X - TASK cancel condition 

TTCC C - PCANCEL command issued 
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TCNR 
TCKP 
TCNP 


TCAE 
36 TCEP 
TCEO 
TCBSCLV 
37 TCSI 


X'40' - Nodal message record 

X'80' - Leave in queue 

X'02' - Do not build virtual buffer control area in 
front of storage 

X'01' - Task accepts I/O errors 


Event post byte 

X'80' - Event post bit on 

X'40' - Event bit BSC-wait or PNET 'B' 
C'T' if spooling from or to tape 


° Each VSE/POWER task that needs to perform input or output operations 
addressed to the system console must specify the operation required in 
the form of a message request word or a reply request word. These con- 
trol fields are used to pass the necessary parameters for the operation 
of the message service routines. 


38-3B TCMW 


3C-3F TCAW 


Message request word (see note 2 for message for- 
mats). Consists of four bytes. The first byte con- 
tains the hold flag and the R5 flag. The remaining 
three bytes contain the message address. The mes- 
sage address field contains the virtual address of 
the message control byte, that is, the byte that 
immediately precedes the text of the message to be 
output. 

Reply request word (see note 2 for message 
formats). Consists of four bytes. The first byte 
contains binary zero. The remaining three bytes 
contain the reply address. The reply address field 
contains the virtual address of the reply control 
byte, that is, the byte that immediately precedes 
the input area into which the reply is to be read. 
If no reply is to be made to the message, this 
field must contain binary zeros. 


TCB Task Register Save Area (TRSA) 


The fields in this area in a TCB record the contents of registers 12 through 
9 whenever entry is made to task selection. If the task state is set to R 
(running) the values in the fields record the contents of the registers when 
the task was most recently given control. If the task state is set to any 
other value the fields contain the current contents of the registers associ- 


ated with the task. 





Bytes Label 
Hex. of Field 
40-43 TCTR 


The format of a TCB is as follows. 


Description/Function 


Register 12 - asynchronous address register (‘task 
PSW'). R12 contains: the address of the first 
instruction to be executed when the task is dis- 
patched. The first byte contains the condition code 
and the program mask bits in the form in which they 
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E8-EF 


FO-F3 
F4-F7 


- TCQW 


TCQA 
TCQV 


e¢ Tape spooling 


FE-FF 
100-103 


* Various control fields 


104-107 
108 


109 


10A-113 
114-117 
118-11B 
11C-11F 
120-123 
124-137 
138-157 


TCTS 
TCTF 


TCTA 
TCTM 
TCTDT 
TCTU 
TCPU 


TCPL 

TCF2 

TCT2S 
TCERT 
TCWOP 
TCOFF 
TCSLI 
TCJBP 
TCLTP 
TCPUP 
TCF3 

TCGDS 
TCSGM 
TCDFT 
TCIDH 
TCUNN 
TCOTV 
TCNRW 


TC3E 
TCHD 


TC3W 


Queue file seek address (MBBCCHHR) for C-K-D, or 
locate word (MORRBBBB) for FBA. M = X'04' 

Real queue space address 

Virtual queue space address 


control words 


Tape request word 

Function byte for open/close tape function (refer 
to TBFU in tape control block) 

Address of tape control block 

Tape unit density specified by operator 

Device type code of related tape unit 

Logical unit of assigned tape unit 

Physical tape unit or PUB address 


Address of spool management parameter list 
Flag byte 2 

X'80' - 2nd time switch for IPWS$S$TR 

X'40' - Execution reader task id 

X'20' - Writer-only partition 

X'10' + POFFLOAD task 

X'08' - SLI in process 

X'04' - JOB statement processing 

X'02' - LST statement processing 

X'01' - PUN statement processing 


Flag byte 3 

X'80' - Internally generated data set header record 
X'40' - Segmentation required 

X'20' - Default SETPRT required 

X'10' - Insert data set header record 

X'08' - Queve record with unknown nodeid 

X'04' - Old tape version 

X'02' - No rewind wanted 

Reserved 


Address of TCB extension area 

Head pointer of virtual storage chain 

Tail pointer of virtual storage chain 

Pointer to 3540 workarea 

Reserved 

General Task Workarea 

This area may be broken into fields in whatever way 
is required by a task (for example, logical reader 
and writer workareas). 


e Logical reader re-definitions 


138-13F 
140 
141 
142 
143 


USCC 
LWPI 
LWPI2 


LWPI3 


LWOC 


Save area for inserted record 
Parameter id byte 1 
Parameter id byte 2 

Parameter id byte 3 

Operation code identifier 


5. Data Areas 5-161 


160-163 


164-167 
168-16B 


16C-16F 
170-173 
174-177 


e TCB expansion area for 2nd data block buffer. 





TCSADV 


TCSAPB 
TCSAR1 


TCSART 
TCSARN 
TCSADP 


Licensed Material - Property of IBM 


Device address where the saved records art to be 
placed 

PUB entry address of the saving device 

Device specific data passed from command processor 
task. 

Linkage register save field 

Second linkage register save field 

Reserved 


If a local printer task is 


started with the double buffering option, the task is equipped with an 
expanded TCB to save specific information required. The TCB is enlarged 
to the next multiple of 32 bytes. 


158-15F 
160-163 
164-167 
168-177 


Notes: 


TC2DW 


TC2DA 
TC2DV 


2nd data block seek address 

Real address of second data buffer 

Virtual address of second data buffer 
Reserved Second linkage register save field 


1. The first characters of the labels in the control block vary ecconaing 
to the generated DSECT or declaration (PL/S). 


Current 


TCB 


Initiator/terminator TCB (used within the CSECT of NU). 


Operator command processor (used within the CSECT of NU). 


Used to 
task to 


Used to 
task to 


Used to 


address 
address 


address 
address 


address 


listings. 


a TCB other than the task's own TCB. 
the TCB of another task.) 


(To enable a 


a TCB other than the task's own TCB. 
the TCB of another task.) 


(To enable a 


a TCB other than the task's own TCB in the PL/S 


The high-order byte of this field will contain the command code of the 


current or last executed operation. 


These labels refer to fields in a second LRSA described later in this 
section under "Second LRSA". 


The second LRSA has a format identical to 


that of the LRSA in the TCB. 


TC 
IT 
OC 
TN 
TP 
TCB 

2 

3 

4. 


Bit 7 of this byte may be set to 0 (to indicate no data transfer or card 


motion), or to 1 (to indicate data transfer or card motion). 
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Overlay for PNET Tasks 


This overlay is used whenever the task is a PNET task. 


It overlays the gen- 


eral task workarea of the standard TCB. 


Bytes 
Hex. 


138-13B 
13C-13F 
140 
141 


142-143 
144-147 
148 


149 


14A-14B 


°e Receiver 


14C-14F 
150-153 
154 

155-157 


Label 





of Field 


TCENCB 
TCENTE 
TCERCB 
TCETTC 
TCETSO 
TCETLC 
TCEFCS 
TCEWKA 
TCEST1 
TCERIF 
TCEPGR 
TCEPRJ 
TCERCS 
TCEEOF 
TCEADS 
TCECMC 
TCEST2 
TCEWIB 
TCECRTL 
TCENOP 
TCESPD 
TCEPBO 
TCERCA 
TCERAB 
TCESOB 


task 
TCERHD 


TCERTL 
TCENRB 


e Transmitter task 


14C-14F 
150 

151153 
154-157 


TCEFOB 
TCENAB 
TCETL# 
TCECL# 


Description/Function 


Address of the node control block (NCB) 
Address of the NCB task entry 

RCB of the task 

Termination condition 

X'80' - SIGNOFF record sent or received 
X'40' - line error stop 

FCS bytes 

Address of the workarea 

Status byte l 

X'80' - RIF sent/received 


X'40' - Permission granted sent/received 
X'20' - Permission rejected sent/received 
X'20' - Receiver cancel sent/received 

X'10' - End-of-file sent/received 

X'08' - Abort transmission sent/received 
X'04' - Transmission complete sent/received 


Status byte 2 

X'80' - Waiting for input buffer 
X'40' - Compressed record too long 
X'20' - Do not post this task 

X'10' - Task suspended 

X'08' - Post only after buffer sent 


X'04' - Receiver cancel after abort sent 
X'02' - Release all buffers requested 
X'01' - Short-on-buffer condition 
Reserved 


Address of received-input-buffer queue 
Tail ponter of received-input-buffer queue 
Number of received buffers 

Reserved 


Address of -free-output-buffer' queue 
Number of acquired buffers 

Total number of records/lines 

Current line number 
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Second LRSA 
Included by definition macro IPWSDSA for the save area. 


A second LRSA is required by some tasks to link routines within the tasks. 
This second LRSA has the same format as the LRSA described in the TCB. 


Linkage from a Physical Routine to a Logical Routine 


Execution of the IPWSOLI macro instruction causes the creation of a second 
LRSA. The first LRSA is associated with the physical routine issuing the 
macro instruction (physical save), and the second LRSA is associated with 
the logical routine invoked by the macro instruction (logical save). The 
first fullword of each save area is initialized to address the TCB of the 
issuing task. The second fullword of each save area is initialized to 
address the other save area. The address of the internal routine entry 
point is stored in the third word of the internal routine save area. 


The first and second LRSAs are collectively called a double linkage register 
save area (DLRSA). Linkage between the first and second LRSA in a DLRSA is 
shown in Figure 5-22 and Figure 5-23 . Refer to VSE/POWER Program Logic 
Manual Part 2, (phases IPWSSPR, IPWSSPL, IPWSSPP) for the contents of the 
registers in the first LRSA. 


Double Linkage Register Save Area (DLRSA) 


Case 1, where the task is executing in the physical routines (PR, PL, PP), 
is shown in Figure 5-22. 


Case 2, where the task is executing in the logical routines (LR, LW), is 
shown in Figure 5-23. 


R13 








R13 in TRSA f#ist LRSA 


4to TCB that 


TCB 







1st LRSA 


SS TET 
Pats ile t7 isto] Bew | 


always valid 







ond LRSA (for Logical rtns.) 


Figure 5-22. Linkage Between the Two LRSAs in a Double Linkage Register Save 
Area. (Case 1) 
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TIMER QUEUE ELEMENT (TQE) 
This control block is used to control timer intervals set up by a VSE/POWER 
task. One Timer queue element (TQE) exists for each interval currently 


setup. 


Definition Macro: IPWSDEF TQE=YES 


Bytes Label 
Hex. of Field Description/Function 
00-03 TQENE Address of next TQE in chain 
04-0B TQETI Interval end time (TOD units) 
OC-OF TQEECBP ECB or address of ECB 
10-13 TQEOTCB Requestor's TCB address 
14 TQEFLG Flag byte 
TQEECB X'80' - ECB within timer queue element 
TQECAN X'40' - Cabncel of TQE requested 
TQEACT X'20' - TQE active 
15-17 Reserved for future use 
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VIRTUAL BUFFER CONTROL AREA (PREFIX) ' 


Definition Macro: IPWSDBA 


When virtual storage (GETVIS) is required by a VSE/POWER task, storage man- 
agement precedes each storage area with a buffer control area, which indi- 
cates to which pool the storage area belongs. 


Bytes 
Hex. 


00-01 
02 


03 

04-07 
08-0B 
0Cc-OF 


Label 


of Field 


BCABL 
BCAPID 


BCAFWD 
BCABWD 


Description/Function 


Length of storage area reserved 
Pool identifier 

X'FF' - if freed 

Reserved 

Pointer to next storage element 
Pointer to previos storage element 
Reserved 
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RELATIONSHIPS AMONG VSE/POWER CONTROL BLOCKS AND DATA AREAS 


Figure 5-26 to Figure 5-36 contain a set of examples which illustrate the 
interrelationships between the VSE/POWER control blocks and tables. The 
examples are based on the assumed position of six separate jobs at an 
assumed point in time (time "t"). Note that the illustrations do not repre- 
sent true situations. 


Time ‘'t" 





Time ————> 







t PSTART F4 


TCB for an execution 


task for jobs in F4 
PSTART RDR,OOC 


TCB for a ROR task 
input class A 












~~~ A” Central Operator PSTART RJE, 030, KENTOMS 
Remote operator *b . .6 SIGNON'S 1, KENTOMS 


TCB for a RDR RJE task 









Task 3 invoked on line 030 input 
class A by default 
PSTART LST, OOE,F 
Task 4 TCB fora 


LST task 
a 
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Device address where the saved records art to be 


160-163 TCSADV 
placed 

164-167 TCSAPB PUB entry address of the saving device 

168-16B TCSAR1 Device specific data passed from command processor 
task. 

16C-16F TCSART Linkage register save field 

170-173 TCSARN Second linkage register save field 

174-177 TCSADP Reserved 


¢ TCB expansion area for 2nd data block buffer. If a local printer task is 
started with the double buffering option, the task is equipped with an 
expanded TCB to save specific information required. The TCB is enlarged 
to the next multiple of 32 bytes. 


158-15F TC2DW 2nd data block seek address 

160-163 TC2DA Real address of second data buffer 

164-167 TC2DV Virtual address of second data buffer 
168-177 Reserved Second linkage register save field 
Notes: 


1. The first characters of the labels in the control block vary according 
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Note: 

1 See Figure 5-29 
2 See Figure 5-30 

3 See Figure 5-31 

* See Figure 5-32 

5 See Figure 5-34 

Before proceeding it is necessary to understand the method of presentation 
of these examples. Each table or block is represented by a block divided 
horizontally into eight boxes. Each box represents a 4-byte field within a 
table which is 32 bytes across, thus matching the number of bytes printed in 
each line of a standard dump as shown in Figure 5-28. 


Standard Dump Output 


Hex Code Alpha Code (translated output) 


a 





Partition ID 













Partition Save Area 


|____Partition Save Ares |< 32 bytes 


4 Bytes 








ATCB 


ALRSA g 


CAT 
WCB 


Figure 5-28. Method of Presentation and Task Conditions 


R5 points to a CB 


These tables in the permanent area are illustrated in the order in which 
they are printed in the dump. The symbol 0 indicates a pointer. For exam- 
ple, "R50 queue record" indicates that register 5 contains the address of a 
queue record. 


Furthermore, the assumed status of each task at time "t" is described in the 
figure captions for each task represented in Figure 5-29 to Figure 5-36. 


Task 1 


e The permanent operator command processor TCB in the permanent area is in 
I state waiting for the operator to enter a command. 
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SKAD of data record in track group 
a el a OS ES 
ae 


MCB DFILE2 
| Channel Program [yf 





CCW points to data record to be processed 


CO Logical data area 


Data record area currently 





TSL 
X'D7' =P state 
Pointer from CAT 
to most recently SS . 
attached RJE task [Storage Descriptor! @ | © | | 
a | Pe Te ee a 
\ TCB for R 
eee at ote ie po or RJE ROR task 
Ea, ne Sea OTE 
Rn aE Ree ee ee ee in ‘P’ state 
Ce hi ES Se ee ee ee 
bt |= BOW - 
Pointer from CAT | | 
to the first LCB A13 eS points to queue record 
Se oS ae ee a ee ee ; 
ne EL CA ae = } 2nd LRSA 
Line Password 
[01 FO F3 FO] . Remote ID, and 
KENTOMS ee. “line number 
points to LCB 
from BCA * LCB 


binary Os = No more LCBs chained 
X'44' indicates the point to entry in the 





points to BCA from LCB 


<———— CCB CCW message queue 
CCW points to [a CCW || Channel program] _| 


data record Pan A Bee eee ee BCA 





points to record in POA 


being processed T v4 Points to last data 
byte read 
“= Bata record currently PDA 
wa = Deingprocessed — EE 
BCW 


Figure 5-31. Relations Between Data Areas in Use by Task 3 
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A] SKAD of next queue record in same queue set 
Label QRNS * 


SKAD of this queue record 


[CE] Contents of first halfword in ECB in MCTA points 
out relative number of first queue record of first 
queue set in aclass chain. (Number is relative to 
queue record 0 which is used for internal purposes. 
The first 8 bytes of this record contain the seek 
address of the MR. 


Contents of second halfword in ECB in MCTA 
points out relative number of first queue record 
of last queue set in same class chain. 


Queue entries 
in the queue file 
(SYSO01) 









3 queue records A queue scan with 
1 queue record 2 queue recor 
A CLASS CHAIN 
consisting of 3 queue sets # 


fo SKAD of previous queue record in same queue set 
Label QRPS * 


(E) SKAD of first queue record of next queue set in 
this class chain. Because this is not the first queue 
record in the queue set this will be 0. 
Label ORON * 


[F) SKAD the first data block of the Track Group 
[GJ SKAD data record to be processed 


[Hh] SKAD of the MR (queue record 
on queue file) 













Data file 
(SYS002) 


Track group for this queue record 


— 


Note: The order of queue records need 
not be continuous.on the file as shown 
in this illustration. 


*See Figure 5-34. 


Figure 5-33. The Queue and Data Files of Task 4 


The queue record being processed (shaded) is the second queue record of the 
second queue set in a class chain (F). 
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R12 = address of the instruction at which processing most recently resumed 
R14 = return after last function was handled 
R15 = CSECT of last function 


















R13 rT tT TTT X'D9' = R state 
eae ee eee ees eee 
TCB for PUN pot] TOT ey | UO UTS ora give state of ragisters before 
in R state task was dispatched. 
ae as ss ae 
ee) CD ET AS EE SAE A USER 
pa tet} LRSA for Physical routine |PW$$PP 
R13 ~~ | [fT] 7] Tf Y 











R14 = return in CSECT(PP) 


R14 = return in CSECT IPWS$S$LW 


} LRSA for Logical routine IPW$$LW 


Figure 5-35. Relations Between Data Areas in Use by Task 5 


X'C6F2’ = Partition |D = F2 for this PDB 
entry in DOS/VSE PIB for F2 

A PDB with three entries. 
(1 for RDR device entry 
1 for LST and 1 for PUN 





» LST Device Entry 


points to entry in DOS/VS PUB for LST spool device 


R3 points to locked resource 


TCB for execution list task 
in L state 


Partition CB R6 


Figure 5-36. Relations Between Data Areas in Use by Task 6, Showing the PDB for 
this Execution List Task 
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6. DIAGNOSTIC AIDS 


This section consists of error diagnostic flowcharts that indicate a method 
of dump analysis to isolate the cause of a program error in VSE/POWER. 


The flowcharts do not represent the only method of analysis but are hints 
and suggestions about where and what to look for in a dump containing the 
VSE/POWER partition. The section begins with general debugging hints, a 
list of which follows. 


e The standalone dump (DOSVSDMP) 

Identifying the VSE/POWER partition (the partition in which VSE/POWER is 
initialized) 

Identifying pages belonging to the fixable area 

Identifying the start of the pageable area 

Locating and identifying control blocks, tables and areas 
Identifying the start of a CSECT 

Establishing the "level" of a CSECT 

Determining the active routine and analyzing the register save areas. 
Analyzing event control blocks 

Using the buffer control words 

Analyzing TCBs 

Establishing queue records in queue sets and class chains 

RJE,BSC and PNET trace facility 

PNET BSC I/O logging on console 

VSE/POWER file dump program 

Establishing the last command issued 

An aid to eliminate components 

Problems related to VTAM. 

Queue and data file chaining error trapping 


GENERAL DEBUGGING HINTS 


Standalone Dump 


It is recommended that the user generate a formatted standalone dump with 
translation (DOSVSDMP). 


This dump should always be used when a standalone dump is required. Format- 
ted page tables will save time in converting virtual to real addresses. 


Identifying the VSE/POWER Partition 
The start of the VSE/POWER partition can be easily identified in the trans- 


lated portion of any dump by the name given to the POWER macro. The charac- 
ters CAT, ten lines under that name, identify the control address table. 
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een PN te ee Oe UB ae eg Sg Naread ae rey eee, a eee 


|Abbreviated * |Pointer to or Address 
|Mnemonic of Table or Area |of the Table/Area 


|Account file seek address |X'200' - X'207' of DMB 
|Account control block [X'1C8' of partition 
|Auxiliary Queue record |x'90' - X'93' of DMB 
| |x'94' - X'97' of DMB 
{Command proc. control blk.|X'138' of the CP TCB 


|Command proc. TCB |X'258' of partition 

|DLRSA (or second LRSA) |R13 in TRSA for task 
[executing code in logical 
|routines X'4' - X'7' in 


|X'7' in LRSA (in TCB) for 
|task executing code in 
[physical routines. 

|End address of VSE/POWER |Subtract 1 from contents of 


| 
| 
| |logical routines X'4' - 
| 
| 
| 


|partition |X'160' - X'163' of part. 
[First fixed page [X'14' of SCB 
| INIT/TERM TCB | |x'25C' of partition 
|Last permanent page [Xx'10' of SCB 
| LCB |X'464' of partition 
| LDA |X'DO' of a TCB (only if 
| | applicable) 

|x'D4' - x'D7' 


| 
|LMF (Line Manager Fields) |X'148' - X'157' of a RJE 

| |Line Manager task TCB 

| LRSA |Ix'98' - X'C7' of a TCB for 
| 
| 
| 


|an RDR, LST, PUN, or XP 
|task 
| 

IMCB for Q file |X'1FC' of partition 


|MCB data file 
|MCB data file 
|MCB data file 


|X'200' of partition 
|X'204' of partition 
|X'208' of partition 
|MCB data file |x'20C' of partition 
|MCB data file |X'210' of partition 
{Remote message contr. blk.|X'1D4' of partition 
|Partition control block |X'AO' - X'A3' of the 
| partition COMREG 


OW PWDHY Ee 


|Page control block |First 24 bytes of each page| 


| |in fixable storage 


|Identifier in | 
|Translated Dump| 


| 
| 
|Real address 

|Virtual address 


| TCBbObCP 


TCBbIbIT 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
|Virtual address 
| 

| 

|This LRSA saves 
|R14-R9 used by 
|the physical 

| routines 
|MCB QFILE 
|MCB DFILE 
| MCB DFILE 
| MCB DFILE 
|MCB DFILE 
|MCB DFILE 
| MSCB 

| PDB 


NOkFWD 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Real address | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Figure 6-2 (Part 1 of 3). Locating and Identifying Control Blocks, Tables, and 


Areas in the Fixable Area 
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Determining the Active Routine and Analyzing Register Save Areas 


It is important to know the routine in which a task is executing in order to 
be able to analyze the meaning of the contents of the registers saved. 


The contents of R12 in the TRSA in a TCR helonoino ta a tack that ic nat in 


160-163 


164-167 
168-16B 


16C-16F 
170-173 
174-177 


e TCB expansion area for 2nd data block buffer. 


TCSADV 


TCSAPB 
TCSAR1 


TCSART 
TCSARN 
TCSADP 
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Device address where the saved records art to be 
placed 

PUB entry address of the saving device 

Device specific data passed from command processor 
task. 

Linkage register save field 

Second linkage register save field 

Reserved 


If a local printer task is 


started with the double buffering option, the task is equipped with an 
expanded TCB to save specific information required. The TCB is enlarged 
to the next multiple of 32 bytes. 


158-15F 
160-163 
164-167 
168-177 


Notes: 


TC2DW 
TC2DA 
TC2DV 


2nd data block seek address 

Real address of second data buffer 

Virtual address of second data buffer 
Reserved Second linkage register save field 


1. The first characters of the labels in the control block vary accoraing 
to the generated DSECT or declaration (PL/S). 


TC 


IT 


OC 


TN 


TP 


TCB 


Current TCB 


Initiator/terminator TCB (used within the CSECT of NU). 


Operator command processor (used within the CSECT of NU). 


Used to 
task to 


Used to 
task to 


Used to 


address 
address 


address 
address 


address 


listings. 


a TCB other than the task's own TCB. 
the TCB of another task.) 


(To enable a 


a TCB other than the task's own TCB. 
the TCB of another task.) 


(To enable a 


a TCB other than the task's own TCB in the PL/S 


2. The high-order byte of this field will contain the command code of the 
current or last executed operation. 


3. These labels refer to fields in a second LRSA described later in this 


section under "Second LRSA". 


The second LRSA has a format identical to 


that of the LRSA in the TCB. 


4. Bit 7 of this byte may be set to 0 (to indicate no data transfer or card 
motion), or to 1 (to indicate data transfer or card motion). 
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PNET ,SNA TRACE RECORD 


Bytes 
Hex. 


00-07 
08-1F 
20-83 
84-87 
88-97 
98-A7 


Data 
Length 


8 
24 
100 
4 
16 
16 


* Status of node 


A8-A9 
AA 
AB-AC 
AD 


FHF KE NDKEHENHO HEE SPH DS WH HK DF fo 


Pe MPe K 


Format 


char 
binary 
binary 
packed 
char 
char 


binary 
binary 
binary 


binary 
binary 
binary 


binary 
binary 
binary 
binary 
binary 
binary 
binary 
binary 
binary 
binary 
binary 


binary 
binary 


binary 


binary 
binary 
binary 
binary 
binary 


binary 


Data 
Description 


Remote node name 
Buffer header 

ACF/VTAM RPL 

Time of day (OHHMMSSF) 
First 16 bytes of data 
Last 16 bytes of data 


Action bytes 1, 2 

Process byte 

Status bytes 1, 2 

Reserved 

Node termination code 

Termination subcode 

Termination code qualifier 

Reserved 

Number of receivers currently active 
Number of transmitters currently active 
Address of free input buffer queue 
Address of to-be-sent queue 

Tail pointer to-be-sent output queue 
Address of receive buffer 

Address of send buffer 

Buffer size 

Maximum number of input buffers 
Maximum number of output buffers 
Number of acquired input buffers 
Unused 

Address of input buffer in use 
Address of output buffer sent 
Reserved 

Address of suspended buffer queue 


Address free input buffer ahead queue 
Address send ahead queue 

Send gate 

Receive gate 

Session status byte 1 to 5 

Reserved 

Task-id of task writing trace record 
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IPWS$SCM 
Command Processor 


An LRSA 
outside TCB 








Physical Routines Execution processor routines 


by physical routines : 
in first LRSA inTCB 


Logical Routines 


Save registers used 
by logical routines 
in second LRSA 
outside TCB 


Save registers used 
Functions : by execution pro- 
E cessors in LRSA 


in TCB 


No save area 
linkage is via 
BALR instruction 


Services 


Figure 5-21. Summary of Linkage Register Save Areas 
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central operator's console at I/0 completion. The operator can request I/0 
logging either at VSE/POWER start-up time via the // UPSI 01 statement or 
while VSE/POWER is running by turning on bit 1 (X'40) in the byte at dis- 
placement X'4AD' of the VSE/POWER partition. 


[—. ee ee ee ee we eS ee 


IN: BCB=bb FCS=ffff BSC=aaaa RCB=rrrr 


| 
LINE=cuu CCB=cccc SENSE=ssss OUT: BCB=bb FCS=ffff BSC=aaaa RCB=rrrr | 
| 
| 


a ag a a ee eee ee 


Figure 6-6. I/0 Logging Record Format 


The meanings are as follows: 


LINE=cuu is the 2-byte device address in binary format 

CCB=cccc are the CSW Status bits 

SENSE=ssss is the 2-byte sense information as returned from the device. 
OUT or IN is the direction of the buffer 

BCB=bb Is the block control byte either sent or received. See 


Figure 3-53 for the meaning of the byte. 


FCS=ffff are the 2 bytes of the function control sequence field See 
Figure 3-52 for the meaning of the byte. 


BSC=aaaa are the first two BSC control characters used in the buffer 
being sent or received. Valid characters are: 


e x'1070' - ACKO 
e  x'3D00' - NAK 
e  xX'1002' - start of text (data) 
¢  xX'012D' - SOH ENQ 
RCB=rrrr Is the record control byte (RCB) and subrecord control byte 


(SRCB) of the first record in the buffer sent or received. 
See Figure 3-50 and Figure 3-51 for the meanings of the 
bytes. 


Hardware Error Recording 
Error recording is part of ERP processing. The error data is placed in the 


system error recorder file (SYSREC) for subsequent editing and printing. 
Error recording takes place under following conditions: 


: BSC RJE line 
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JOB NAME 


Active COMREG address 


Low address storage 








Translated 
dump 
output 


sy 


DOS/VSE 
Supervisor 


SYSCOM 


PDAREA Partition ID 


il 


Name given to the VSE/POWER 
macro at generation 


Partition Save Area 
a i 
140 Label Area 


VSE/POWER Control Address 
Table and Constants 


7 ee 


VSE/POWER 
permanent 
area 10K 


Wait Control Block 


it 


Command Processor Storage descriptors 


Control Block 


ag 


identifies pages belonging 
to the fixable area 


2m 
20 

S 

oJ 


(min. of 4K) 

Pageable — VSE/POWER CSECT 
area plus _ names 

GETVIS oy 


Ss 


Figure 6-7. Pictorial Representation of a System Dump Containing the VSE/POWER 
Partition 
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neg Method of Analysis Recommendations for 
Further Problem Analysis 







Check 1 
System information 
available? 


















Has the user completed problem 
determination as recommended in 
DOS/VSE Serviceability Aids and 
Debugging Procedures (Section 3 

and Section 4, Part 1)? 










Establish what the user has done to 
isolate the cause of the malfunction 







If you think the information he has 
gathered about the malfunction is 
not sufficient, go to check 2. 


If you have enough information to 
begin debugging, go to check 7. 


















Check 2 
Eliminate 
components (Level 1) 












If the malfunction recurs, analyze 
it using the dumps obtained as 

recommended in DOS/VSE Serviceability 
Aids and Debugging Procedures. 


Rerun the job under DOS/VSE,that 
is,do not run as a VSE/POWER job 
and do not initiate a VSE/POWER 
partition. Ensure to include the 

// OPTION DUMP statement in the 
job stream and as an option initiate 
the SDAID dump on program check. 
(For jobs entered under RJE you 
must submit the job stream and 
input data files to the central station, 
request output to be directed to a 
tocal LST and/or PUN. 


Has the program ever run correctly 
under VSE/POWER 


Check the following 

e Errors in JECL and device 
assignments 

e Condition of spooling devices 
and disk packs 

e@ The level of, and support for 
VSE/POWER in the DOS/VSE 
supervisor 

@ Storage requirements and options 

specified in your version of 

VSE/POWER 

Try to correct any errors. 















If the malfunction does not recur, 
proceed to check 3. 














Check the following: 

@ Changes in job stream JECL 

@ Changes in the DOS/VSE supervisor 

e Changes to data files/volumes 

e Changes to VSE/POWER 
(regeneration or application of PTF ) 

e@ Condition of spooling devices 
and disk packs 

Check that the PTFs were applied 

correctly, and correct any other 

obvious errors in JECL or DOS/VSE 


Check 3 
frogram fails when run 
und. VSE/POWER only 













































Determine if other programs are 
failing when run under the same 
version of VSE/POWER . 

If so, contact the programmers 
concerned, who may have isolated 
the reason already, 
Proceed to check 4. 


Figure 6-8 (Part 1 of 3). Initial Environmental Checks 
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Check Method of Analysis Recommendations for 
Further Problem Analysis 


Check 10 







The contents of bytes 6 and 7 
of the TCB will contain one of 
the following hex codes: 



















Locate R6 in TRSA of 
execution task TCB(s). 


Establish 
partition 





















e C2C7 = BG This should address the 

@ C6F1 = F1 associated partition control 
e C6F2 = F2 block(s). 

e C6F3 = F3 Proceed to check 10a. 

@ C6F4 = F4 





Check 10a 


Analyze 
information 
in the PDB 















Check CCB, TCB, PIB and 
COMREG addresses for validity 
and examine device type codes 

and requestor IDs. 

Make a note of any irregularities 
(this may be the cause of the error) 
and proceed to check 11. 


Examine the RDRdeviceentry, 
the LST deviceentries and the 
PUNdevice entries. 

From these obtain the addresses 
of the TCBs associated and the 
CCB addresses. 

Also note the partition COMREG 
address, the PIB address, device 
type codes (in the entries), and 
requestor {Ds. 




























Check 11- 





The following checks 

guide you through a method 
of analysis that will help you 
to locate the reason for the 
loss of one of these postings. 


The wait state implies that a 
condition has occurred that 
has either not been satisfied 
or not been detected. 

When a VSE/POWER event 
occurs it must be reported by: 














Summary of 
reason for the wait. 















Proceed to check 12. 


1. The posting of the task 
ECB in the TCB, or the 
posting of any other ECB 
or CCB or the posting of 
an LK ina CB. 





. The posting of the 
VSE/POWER MECB in 
the CAT. 





Any code that is handling a 
condition must account for 

both postings, or prove them 
not to be required. 


Figure 6-9 (Part 4 of 9). Wait State 
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Check 


Check 16 












Task in C, S, 
M or QO state 


































Method of Analysis 


C or S state implies that 
the related task is waiting 
for posting of the traffic 
bit (bit 16) within the 
control block addressed 


M or Q state implies that the 
related task is waiting for 


the posting of the traffic 

bit (bit 16) within any one 
of a set of control blocks. 
The addresses of the relevant 
control blocks are contained 
in a sequential list addressed 
by register 1 of the waiting 
task and delimited by the 
value X'FF' in the byte 
fotlowing the list. 


*Refer to Appendix 
D for a summary of 
ECB usage. 


Figure 6-9 (Part 8 of 9). Wait State 


by register 1 of the task in question. 





















Recommendations for 
Further Problem Analysis 


Examine bit 16 in the 
conventional CCB or the 
VSE/POWER ECB addressed 
by R1 in the TRSA in the 


TCB. If bit 16 = 0, the CCB/ECB* 


is not posted and the 
system may be in a wait 


caused by a lost I/O interrupt. 
Examine CCBs in user 
partition running under 
VSE/POWER. These CCBs 
will be addressed by R11 in 
the relevant PSAs. 

A branch should have been 
made to the task scan routine 
to examine the next TCB in 
the TSL. If bit 16 = 1, the 
task should have been dispatched. 


Examine bit 16 in all CCBs or 
ECBs addressed from the address 
list pointed to by R1 in the TRSA 
in the TCB. (ECBs may be in 

the TCCT field of the TCB, thus 
allowing classes to be checked; 
from the MCTA, ORs can be 

cross checked with the QR,see 
check 19.)* 

If bit 16 = 1 in any of the CCBs 

or ECBs, the task should have been 
dispatched. 

If bit 16 = 0, examine the next 
CCB or ECB addressed by the 
address list. If they are all 0 the 
cause of the wait may be a lost 1/O 
interrupt. 

Examine CCBs in user partition 
running under VSE/POWER. These 
CCBs will be addressed by R11 in 
the relevant PSAs. Refer to 
DOS/VSE Serviceability Aids and 
Debugging Procedures, Section 4 
Part 1. 
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Check Method of Analysis Recommendations for 
Further Problem Analysis 















Check 1 
Check the 
information 
available 































Use the list below to check 
the minimum amount of 
system information required: 
@ SYSLOG log sheet 
@ Note of PSW and iow 
address storage bytes 
X'00' - X‘17' 
® Standalone dump 
(formatted) * 
@ Line printer output from 
job(s) 
@ User's VSE/POWER generation 
generation listing 
Trace of the loop. 


If possible try to obtain any notes 
made by the user about the job(s) 
action and system activity prior to 
the malfunction. 






Proceed to check 2. 


* An example and description of 
a formatted standalone dump 


is given in Section 2 of 
VSE/Advanced Functions 
Serviceability Aids and 
Debugging Procedures. 


Check 2 
Check 
messages 

and responses 


























Look for unusual messages (those 
that do not obviously apply to 
jobs running may give you a clue). 
Any incorrect responses will 
require a user rerun of the job(s). 
Proceed to check 3. 


Examine the SYSLOG log sheet 
scanning for messages and 
Operator responses. Check 
responses given with those 
recommended in DOS/VSE 
messages. 



















Check 3 








Check DLBL, EXTENT, and LABEL 
information. 

If message 10121 has not been 

issued, turn to Figure 6-16; otherwise; 
proceed to check 4. 


Check that VSE/POWER has been 
correctly initialized by checking 
for message 10121. 









VSE/POWER 
initialized 














Figure 6-10 (Part 1 of 2). Loop 
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Check Method of Analysis Recommendations for 
Further Problem Analysis 


Check 5 
























Examine bit 16 in the conventional CCB or 
the VSE/POWER ECB addressed by R11 in 
the TRSA in the TCB. 

If bit 16 = O, the CCB is not posted and 

the system may be in a wait caused by a 
lost 1/O interrupt. Examine CCBs in user 
partitions running under VSE/POWER. 
These CCBs will be addressed by R1 in the 
relevant PSAs. 

A branch should have been made to the task 
scan routine to examine the next TCB in 
the TSL. If bit 16 = 1, the task should 
have been dispatched. 


C state implies that the related 
task is waiting for posting of the 
traffic bit (bit 16) within the control 
block addressed by register 1 of the 
task in question. 


Task in 
C state 

















Check 6 
Check tabies + 
control blocks set 
































Determine which initialization phase is 
being processed. 


Refer to the VSE/POWER LOGIC, 
Part 2 for a description of actions performed 





up by the How to locate: by the Initialization phase. 
Various Bytes X'15C’ - X'15F’ of the start of 
initialization the partition point to the first pageable 


area. Add X‘800’, used for the command 
processor work area, to this. 


Phases 


This is the starting address of the IP root 
phase. 

Add X‘400' more to locate the storage 
descriptor of the initialization phase being 
processed. 


Figure 6-13 (Part 2 of 2). VSE/POWER Not Initialized 
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Check Method of Analysis Recommendations for 
Further Problem Analysis 


Check 5 














Examine bit 16 in the conventional CCB or 
the VSE/POWER ECB addressed by R11 in 
the TRSA in the TCB. 

If bit 16 = O, the CCB is not posted and 

the system may be in a wait caused by a 
lost 1/O interrupt. Examine CCBs in user 
partitions running under VSE/POWER. 
These CCBs will be addressed by R11 in the 
relevant PSAs. 

A branch should have been made to the task 
scan routine to examine the next TCB in 
the TSL. If bit 16 = 1, the task should 
have been dispatched. 


C state implies that the retated 
task is waiting for posting of the 
traffic bit (bit 16) within the control 
block addressed by register 1 of the 
task in question. 


Task in 
C state 



















Check 6 
Check tables + 
control blocks set 


































Determine which initialization phase is 
being processed. 


Refer to the VSE/POWER LOGIC, 
Part 2 for a description of actions performed 


up by the How to locate: by the Initialization phase. 
Various Bytes X’15C’ - X'15F’ of the start of 
initialization the partition point to the first pageable 


area. Add X‘800’, used for the command 
processor work area, to this. 


Phases 


This is the starting address of the IP root 
phase. 

Add X‘400’ more to locate the storage 
descriptor of the initialization phase being 
processed. 


Figure 6-13 (Part 2 of 2). VSE/POWER Not Initialized 
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APPENDIX A. VSE/POWER STATUS BYTES IN THE VSE/ADVANCED 
FUNCTIONS SUPERVISOR 


SYSCOM* 


Location X'5C' - X'5F' contains the address of the VSE/POWER partition (la- 
bel IPWSPDA in phase IPW$$NU), if VSE/POWER is initiated. 


Location X'42' contains a flag byte: 


x'08' 
x'04' 


VSE/POWER supported 
VSE/POWER initialized 


Partition COMREGS* 


Location X'AO' - X'A3' contains the address of the partition control block 
(0 if no CB exists for this partition). 


VSE/POWER FLAG BYTES 


Location X'A4' contains VSE/POWER flags: 


X'80' = VSE/POWER accounting support 

X'40' = This partition under control of VSE/POWER 
X'20' = This partition is the VSE/POWER partition 
X'08' = Partition-waiting-for-work state 


Location X'A5' reserved 


* Refer to VSE/Advanced Functions Diagnosis: Service Aids, SC33-6099, for a 
full description and locations of SYSCOM and the partition COMREGs. 


Status Bytes A-1l 
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|ECB 


| ACB 
|CAT 
| 


| SCB 
|VSC 
| DMB 


|TCB 


TCB 
TCB 
TCB 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
ae 
| TCB 
| 
| 
| 
| 
| SRB 
| 
| ASA 
| 
| 


Figu 


An entry in the master class table area can be used as an ECB. 


APPENDIX B. SUMMARY OF ECB USAGE 


ECB usage is summarized in Figure B-1 


in: |Posted by : (Phase) |Unposted by:|Use when posted : | 
| IPWS$SGA/IPWSSSF |IPWSSPA/PF |account file is empty | 
| Appendage |Task select. |Indicates work-to-do. | 
|for VSE/POWER | 
| IPWSRLW | IPWSRSW |Work space is avail. | 
B | IPWSRLV | LPWSRSV |Virtual storage avail.| 
| IPWSSFQ | ITPWSSRQ, |Queue space is avail. | 
| | IPWS$PD | 
(cP) |IPWS$I7 | [PWSSCM |\Indicates that IPW$$I7| 
| |has sent information | 
| |to IPWSS$CM | 
(LD) |all PNET tasks | [PWSS$LD |If work is to do for | 
| IPWSSAQ, IPWSSMS, | |PNET Driver | 
|IPWSSCPS, IPWSSCP | 7 | 
(LMGR)|* Channel End Appendage| IPWSS$LM |work-to-do for line | 
|* line start |manager. | 
|* line stop | | | 
(OB) |IPWSSIB, IPWSSMP, | IPWSSOB |Indicates that trans. | 
| IPWSSSN | |to SNA terminal which | 
| | |was previously | 
| | |suspended is to | 
| | | continue. | 
(SN) |ACF/VTAM at completion | IPWSSSN |Indicates that IPWSSSN| 
lof a RECEIVE ANY | |must attach IPWSS$IB_ | 
(SN) |IPWSSSN, IPWSSLN, | IPWSSSN |Indicates work-to-do | 
| IPWS$IB, IPWSSOB, | |for IPWSSSN | 
|IPWSSMP, IPWSSLF, | | | 
|IPWSS$VE, IPWSSLH, | | | 
| IPWS$MS | | | 
|IPWSSAS (Subtask) | |Indicates that service| 
| | |request is processed | 
B | IPWSSAS | IPWSSAS |Indicates that service| 
|(Subtask)  |request is waiting to | 
| | |be processed. | 

re B-1. Summary of ECB Usage 


In that case 


the address of the entry is contained in the task class list (ECB list) in 


the TCB. 


When the ECBs in the RDR, LST, or PUN class are posted (by 
IPWSSAQ), they indicate that an active entry exists in the class chain 


represented by this class table entry. These ECBs are unposted by IPWSSNQ. 


Appendix B. 


Summary of ECB Usage 


B-1 
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APPENDIX C. VSE/POWER STATUS REPORT 


This report is printed on two occasions: 


1. When VSE/POWER is initiated, when SYSLST is assigned to a line printer 
in the VSE/POWER partition. 


2. When VSE/POWER is terminated with a PEND command that includes a phys- 
ical address of a line printer. . 


The format for C-K-D devices is shown below. The format for FBA devices is 
similar but definitions shown below for tracks are for FBA blocks. 


QUEVE FILE IJQFILE 


TOTAL NUMBER OF QUEUE RECORDS xxxx RECORDS 
NUMBER OF FREE QUEUE RECORDS Xxxx RECORDS 
MAXIMUM NUMBER OF QUEUE RECORDS USED IN PRESENT SESSION xxxx RECORDS 


DATA FILE IJDFILE 


TOTAL NUMBER OF TRACKS xxxx TRACKS 
TRACK GROUP SIZE xx TRACKS 
DATA BLOCK SIZE xx BYTES 


ACCOUNT FILE IJAFILE 


TOTAL NUMBER OF TRACKS xxxx TRACKS 
PERCENTAGE OF FILE THAT IS FILLED XX % 
FIXABLE STORAGE ALLOCATED TO VSE/POWER PARTITION xx PAGES 
NUMBER OF TIMES TASKS WERE WAITING FOR PFIXED STORAGE xxx TIMES 
MAXIMUM NUMBER OF PAGES FIXED xx PAGES 
MAXIMUM NUMBER OF TASKS ACTIVE AT ONE POINT IN TIME xx TASKS 
NUMBER OF TIMES TASKS WERE WAITING FOR VIRTUAL STORAGE xxx TIMES 
TIME INTERVALS FOR SHARED SPOOLING (SYSID=n) 

Tl = x SECONDS, T2 = x SECONDS, T3 = x SECONDS, T4 = x SECONDS 
NUMBER OF NOTIFY MESSAGES LOST: Xxxxx MESSAGE (S) 


Figure C-1. Status Report 
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APPENDIX D. FORMAT OF INTERNAL MACROS 


IPW$BUF - PNET Buffer Management 
This macro is used as linkage to the buffer service routine (IPWSSBS). 


The IPWSBUF macro has the following format: 


CNTRL 
FREE 
GET 

HEADQ 
&name IPWSBUF TYPE=MSG 

QUEUE 

PURNR 

PURNT 

RELEASE 

»MODE=IN 
OUT 

<,REG=(R1)> 
< ,WAIT=NO> 
=YES 


REG is optional but if specified means that the address of the 
buffer that is to be referenced is already loaded into R1 and 
the address in the NCB should not be used. If not specified 
then the address from the NCB will be used. This keyword is 
only valid for TYPE=QUEUE ,MODE=OUT. 


WAIT YES specifies that the task wants to be placed in the wait 
state until a buffer is available. 
NO means that control will be returned directly to the calling 
task, with or without a buffer being available. 
YES is default. 


Register usage is as follows: 


RO function code, describing the type of function to be 
performed. 
01 - GET - MODE=IN 
02 - RELEASE - MODE=IN 
03 - FREE - MODE=IN 
04 - QUEUE - MODE=IN 
05 - GET - MODE=O0UT 
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e Register 1 is zero, then ALL buffers are removed from the queue. 

° Register 1 non zero then only buffers belonging to this task are 
removed from the queue. 

If the buffer has the 'release-after-sent' flag set then the buffer is 

returned to the VSE/POWER storage pool. All other buffers aré: queued 

into the ‘free output queue’. 


QUEUE 
causes the TP-output buffer, addressed by register 1, to be queued as 
the last entry in the ‘to-be-sent chain’. If the buffer just queued is 


the first in the queue, then the line driver is posted. 


If a line error has been detected or a 'SIGNOFF' record has been 
received, then the buffer is added to the 'free output queue’. 


RELEASE 


causes all TP-buffers in the ‘free output chain' (anchored to this NCB 
task entry ), to be released and returned to the VSE/POWER storage pool. 


IPW$GMS - General Message Service 


The 
all 
The 


The 


macro IPWSGMS must be used to invoke the general service function for 
messages and commands that should be routed to the correct nodeid/user. 
command/message must be in NMR format. 


format of the macro is as follows: 


&name IPWSGMS TYPE=DIST,NMR=(Rx) 


TYPE 


NMR 


TYPE 


The 


RO 


R1 


R4 


R5 


TYPE=SUB 


DIST causes the link to the general message distribution ser- 
vice. 


Rx is the address of the nodal message record that must be 
distributed. 


SUB causes a link to the general message service routine to do 
message substitution. 


register usage for TYPE=SUB is as follows: 
message length - 1. 
address of message. 
address of message control table. 


TCB address to be used for message modification. 
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: Register 1 is zero, then ALL buffers are removed from the queue. 

e Register 1 non zero then only buffers belonging to this task are 
removed from the queue. 

If the buffer has the 'release-after-sent' flag set then the buffer is 

returned to the VSE/POWER storage pool. All other buffers aré: queued 

into the 'free output queue’. 


QUEUE 
causes the TP-output buffer, addressed by register 1, to be queued as 
the last entry in the 'to-be-sent chain'. If the buffer just queued is 


the first in the queue, then the line driver is posted. 


If a line error has been detected or a ‘SIGNOFF’ record has been 
received, then the buffer is added to the ‘free output queue’. 


RELEASE 


causes all TP-buffers in the 'free output chain’ (anchored to this NCB 
task entry ), to be released and returned to the VSE/POWER storage pool. 


IPW$GMS - General Message Service 


The 
all 
The 


The 


macro IPWSGMS must be used to invoke the general service function for 
messages and commands that should be routed to the correct nodeid/user. 
command/message must be in NMR format. 


format of the macro is as follows: 


&name IPWSGMS TYPE=DIST,NMR=(Rx) 


TYPE 


NMR 


TYPE 


The 


RO 


Rl 


R4 


R5 


TYPE=SUB 


DIST causes the link to the general message distribution ser- 
vice. 


Rx is the address of the nodal message record that must be 
distributed. 


SUB causes a link to the general message service routine to do 
message substitution. 


register usage for TYPE=SUB is as follows: 
message length - 1. 
address of message. 
address of message control table. 


TCB address to be used for message modification. 
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a user on another node, to the central operator, or to an ICCF user. &P The 
format of the macro is as follows: 


&name IPWSNTY MSG=(Rx) 
=S$mmmmm 

NODE=(Ry) 

USER=(Rz) 


MSG Rx contains the message id index 
Smmmmm is the actual message number as obtained from the mes- 
sage definition module prefixed with $. 


NODE Ry contains the address of an eight byte field containing the 
target node name. If not specified the local node is assumed 
to be the required destination. 


USER Rz contains the address of an eight byte field containing the 
target userid, either a remote id in the form 'Rnnn' or an 
ICCF userid. 


If not specified, the message is routed to the local console 
of the specified node. 


IPW$RLV - Release Virtual Storage 


This macro is used to release storage acquired with the IPWSRSV macro. The 
storage is returned to the appropriate pool and is available for other 
tasks. All tasks waiting for storage will again be posted in an attempt to 
satisfy the requirements. 


The format of the macro is as follows: 


&name IPWSRLV <ADDR=(Rx)> 
<,ALL> 
<,OWNER=(Ry )> 
<, ANCHOR=(Rz)> 


ADDR is the register which holds the address of the work space that 
should be released. The length of the buffer is found from the 
buffer prefix. It is not required if ALL is specified. 


ALL means that all storage belonging to this task should be 
released. 
OWNER specifies the address in Ry of the TCB that is to be used as 


owner for this storage. If not specified the issuing task will 

be considered as owner. The 'head' pointer will be taken from 

the owners TCB. Must NOT be specified if ANCHOR is specified. 
ANCHOR will be used as the ‘head’ pointer for the chain. 


Upon return RO, R1, R2, and R3 are destroyed. 
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APPENDIX D. 


FORMAT OF INTERNAL MACROS 


IPW$BUF - PNET Buffer Management 


This macro is used as linkage to the buffer service routine (IPWSSBS). 


The IPWSBUF macro has the following format: 


&name 


REG 


WAIT 


CNTRL 
FREE 
GET 
HEADQ 


IPWSBUF TYPE=MSG 


QUEUE 
PURNR 
PURNT 
RELEASE 
, MODE=IN 
OUT 
<,REG=(R1)> 
<,WAIT=NO> 
=YES 


is optional but if specified means that the address of the 
buffer that is to be referenced is already loaded into R1 and 
the address in the NCB should not be used. If not specified 
then the address from the NCB will be used. This keyword is 
only valid for TYPE=QUEUE ,MODE=OUT. 


YES specifies that the task wants to be placed in the wait 
state until a buffer is available. 

NO means that control will be returned directly to the calling 
task, with or without a buffer being available. 

YES is default. 


Register usage is as follows: 


RO 


function code, describing the type of function to be 
performed. 


OL = -GET - MODE=IN 
02 - RELEASE - MODE=IN 
03 - FREE - MODE=IN 
04 - QUEUE - MODE=IN 
05 - GET - MODE=OUT 
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the ‘received queue' is empty and on entry register 1 contained zero, 
then a return is made to the user with register 1 containing zero to 
indicate that no buffer was available. If the ‘received queue’ was emp- 
ty and register 1 was NOT zero, then the task is put into a wait for a 
BSC event. 


Note: This function is only invoked by the Receiver. 


3. QUEUE 
causes the input buffer being received, addressed by R1, to be queued as 
last entry in the ‘received input chain' for the task, checks the number 
of buffers in the queue against the maximum value specified in the 
MAXBUF parameter for the node, and if the maximum is reached set a sus- 
pend for this task. 
Note: This function is invoked only by the line driver when an input 
buffer is received successfully. 

4. RELEASE 
causes all buffers up to the maximum specified by MAXBUF, to be freed 
from the 'free input chain' and to be returned to VSE/POWER storage 
pool. If the number of buffers in the ‘free input chain’ is less than 
MAXBUF then all are freed except for one. 
Note: This function is only invoked by the Line Driver. 

MODE=OUT 

1. CNTRL 
causes a small TP buffer used for a NJE control record to be reserved 
and its address to be placed in Rl. The buffer is marked to be freed 
after successful transmission. If register 1 contains zero on entry and 
no space is available then return is made to the user with register 1 as 
zero. If register 1 contains non zero on entry then the task is put into 
wait until space becomes available. 

2. FREE 


causes the output buffer currently being sent, addressed by register 1, 
to be queued as first entry in the 'free output chain’ of the related 
NCB task entry. 


If one of the following conditions arises then the buffer is released 
and its storage returned to the VSE/POWER storage pool. 


If the 'release-after-sent' flag is set in the buffer header. 

If the buffer owner is the line driver. 
° SIGNOFF is in process or a line error has occurred. 
If the 'short-on-buffer' condition is set in the NCB task entry (NCBEST2 
= NCBESOB) then the task must also be posted. 
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R2 destroyed 
R3 destroyed 
R4 destroyed if OWNER or ANCHOR was specified. 


Note: Even if WAIT=YES was specified, Rl must be checked to see if storage 
became available. It may happen that the task is posted again because of 


some abnormal condition, or a termination condition, and will then return 
without having acquired the storage. 


IPW$STM - Set Timer Interval 
The format of the IPWSSTM macro is as follows: 


IPWSSTM TIME=ttt 
(Ry) 

<,ECB=(Rx)> 

<, TQE=(R1)> 
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¢ Register 1 is zero, then ALL buffers are removed from the queue. 

° Register 1 non zero then only buffers belonging to this task are 
removed from the queue. 

If the buffer has the 'release-after-sent' flag set then the buffer is 

returned to the VSE/POWER storage pool. All other buffers aré*- queued 

into the 'free output queue’. 


8. QUEUE 
causes the TP-output buffer, addressed by register 1, to be queued as 
the last entry in the 'to-be-sent chain’. If the buffer just queued is 


the first in the queue, then the line driver is posted. 


If a line error has been detected or a 'SIGNOFF' record has been 
received, then the buffer is added to the ‘free output queue’. 


9. RELEASE 
causes all TP-buffers in the 'free output chain' (anchored to this NCB 
task entry ), to be released and returned to the VSE/POWER storage pool. 
IPW$GMS - General Message Service 
The macro IPWSGMS must be used to invoke the general service function for 
all messages and commands that should be routed to the correct nodeid/user. 
The command/message must be in NMR format. 


The format of the macro is as follows: 


&name IPWSGMS TYPE=DIST,NMR=(Rx) 
TYPE=SUB 


TYPE DIST causes the link to the general message distribution ser- 
vice. 
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LIST OF ABBREVIATIONS 


AARA 
ACB 
ACB 
AQ 
AQRA 
ASAB 
BCA 
BCW 
CAT 
CB 
CCB 
CI 
CIB 
CIDF 
CP 
CPB 
DLRSA 
DMB 
DQ 
DSHR 
DRW 
EAR 
ECB 
ER 
ETX 
FBA 
FCB 
FCS 
FQ 
GD 
GNB 
IB 
IC 
IR 
INIT/TERM 
IP 
JECL 
JHR 
JTR 
LCB 
LDA 
LF 
LK 
LL 
LMF 
LMGR 
LN 
LP 


Auxiliary account record area 
Account control block 

Access method control block 
Add to queue 

Auxiliary queue record area 
Asynchronous service anchor block 
Buffer control area 

Buffer control word 

Control address table 

Control block 

Command control block 

Control interval for FBA 
Communicator information block 
CI description field 

Command processor 

Command processor control block 
Double linkage register save area 
Disk management block 

Delete from queue 

Data Set Header Record 

Disk request word 

Execution account record 
Event control block 

3540 Diskette reader 

End of text 

Fixed block architecture 
Forms control buffer 

Function Control Byte 

Free queue 

Get data record 

Generation table 

SNA inbound processor 

Pass command routine 

Internal reader 
Initiator/Terminator 
Initialization processor 

Job entry control language 
Job Header Record 

Job Trailer Record 

Line control block 

Logical data record area 

SNA logoff processor 

Lockword 

Logical list 

Line manager field 

Line manager 

SNA logon processor 

Logical punch 
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GLOSSARY 


Following is a definition of some of the terminology used in this manual. 


Adjacent Node. Adjacent Nodes are any nodes which are directly connected 
with one another by a BSC connection or an SDLC session. 


Alternate Route. It is possible to define for any destination an alternate 
path that may be used in the case that the main path, defined by the ROUTE] 
parameter in the PNODE macro, is not available. This second route is called 
an alternate route. It may be specified by the ROUTE2 parameter in the 
PNODE generation when defining the destination node. It does not need to be 
a path using the same line discipline. It is NOT used as a ‘load levelling' 
mechanism. 


Command Switching. Command switching is the transmission of a command 
which has been received from the network to the next destination on its way 
to its final destination. 


Compression. Compressing a data stream replaces two or more consecutive 
blanks by a one byte control character containing information as to how many 
blanks have been compressed. If three or more consecutive like non-blank 
characters are found then they are replaced by two bytes, the first control 
byte containing information as to how many occurences of the character have 
been compressed, and the second byte containing the actual character. 


Compression is very widely used to reduce the size of the data stream before 
transmitting it via a tele-processing system. 


Decompression. Decompression takes a compressed data string and expands it 
again to its original size by replacing the compression control bytes by the 
specified number of characters or blanks. 


Direct Link. A Direct Link is defined as a connection between two adjacent 
nodes which is physically accomplished by a BSC line between the two nodes. 


End Node. The End Node refers to that node which is designated as the 
final destination for the job or output. This can be the Local Node or any 
other node that is reachable within the network. 


Execution Node. The execution node is the end node for job's. It is that 
node on which the job will be executed. It may be another VSE/POWER node or 
any other node supporting the networking protocol used by VSE/POWER PNET, 
and reachable from the local node. 


Final Destination. Same as End Node. 
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that a part of the logical record will be put into the first block and the 
remainder of it will be placed at the start of the next block. Spanning may 
take place over any number of physical data records. To recover the logical 
record more than one physical record will have to be read. 


Session. A Session can exist between any two nodes in the network. A ses- 
sion is established by use of ACF/VTAM or ACF/VTAME. 


Store-and-Forward Node. Same as an intermediate node. 

Topology Record. Topology records are written by JES2 NJE to dynamically 
describe the network. Records are sent whenever a node is started or 
stopped. These records are ignored by VSE/POWER. 

Userid. The Userid is a 1-8 byte alpha-numeric identifier which may be 


used to identify the user who has submitted, or is to receive, the job or 
output. 
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Check Method of Analysis Recommendations for 
Further Problem Analysis 


Check 5 


















Examine bit 16 in the conventional CCB or 
the VSE/POWER ECB addressed by R11 in 
the TRSA in the TCB. 

If bit 16 = O, the CCB is not posted and 

the system may be in a wait caused by a 
lost 1/O interrupt. Examine CCBs in user 
partitions running under VSE/POWER. 
These CCBs will be addressed by R1 in the 
relevant PSAs. 

A branch should have been made to the task 
scan routine to examine the next TCB in 
the TSL. !f bit 16 = 1, the task should 
have been dispatched. 


C state implies that the related 
task is waiting for posting of the 
traffic bit (bit 16) within the control 
block addressed by register 1 of the 
task in question. 















Task in 
C state 









Check 6 
Check tables + 
control blocks set 
































Determine which initialization phase is 
being processed. 


Refer to the VSE/POWER LOGIC, 
Part 2 for a description of actions performed 





up by the How to locate: by the Initialization phase. 
Various Bytes X‘15C’ - X'15F’ of the start of 
initialization the partition point to the first pageable 


area. Add X’800', used for the command 
processor work area, to this. 


Phases 


This is the starting address of the IP root 
phase. 

Add X‘400’ more to locate the storage 
descriptor of the initialization phase being 
processed. 


Figure 6-13 (Part 2 of 2). VSE/POWER Not Initialized 


6. Diagnostic Aids 
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APPENDIX A. VSE/POWER STATUS BYTES IN THE VSE/ADVANCED 
FUNCTIONS SUPERVISOR 


SYSCOM* 


Location X'5C' - X'5F' contains the address of the VSE/POWER partition (la- 
bel IPWSPDA in phase IPWSSNU), if VSE/POWER is initiated. 


Location X'42' contains a flag byte: 


x'08' 
x'04' 


VSE/POWER supported 
VSE/POWER initialized 


Partition COMREGS* 


Location X'AO' - X'A3' contains the address of the partition control block 
(O if no CB exists for this partition). 


VSE/POWER FLAG BYTES 


Location X'A4' contains VSE/POWER flags: 


X'80' = VSE/POWER accounting support 

X'40' = This partition under control of VSE/POWER 
X'20' = This partition is the VSE/POWER partition 
X'08' = Partition-waiting-for-work state 


Location X'A5' reserved 


* Refer to VSE/Advanced Functions Diagnosis: Service Aids, SC33-6099, for a 
full description and locations of SYSCOM and the partition COMREGs. 
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APPENDIX B. 


ECB usage is summarized in Figure B-1 


|ECB in: 


| ACB 
| CAT 
| 

| SCB 
| VSCB 
| DMB 


| TCB 


(CP) 


(LD) 


|Posted by : (Phase) 

| IPWSSGA/IPWSSSF | IPWSSPA/PF 

| Appendage 

| 

| IPWSRLW | [PWSRSW 

| IPWSRLV | IPWSRSV 

| IPWSSFQ | IPWS$$RQ, 
| IPWSSPD 

| IPWSS$I7 | IPWSSCM 

| | 

|all PNET tasks | IPWSS$LD 


| IPWS$AQ, IPWSS$MS, | 
| IPWS$CPS, IPW$SCP | 


(LMGR)|* Channel End Appendage| IPWS$$LM 


(OB) 


(SN) 


(SN) 


|* line start 

|¢ line stop | 

| IPWS$IB, IPWSSMP, | 

| IPWSSSN | 
| 
| 
| 


| 
| 
|ACF/VTAM at completion | IPWSSSN 
lof a RECEIVE ANY 

|IPWSSSN, IPWSSLN, 
| IPWS$IB, IPWSSOB, 


| 

| 

| IPWSSMP, IPWSSLF, | 
| IPWSSVE, IPWSS$LH, | 
| 

| 


IPWSSOB 


IPWSSSN 


| IPWSSMS 
|IPWSSAS (Subtask) 


| IPWSSAS 


| IPWSSAS 


| (Subtask) 


Figure B-1. Summary of ECB Usage 


An entry in the master class table area can be used as an ECB. 


SUMMARY OF ECB USAGE 


|Unposted by:|Use when posted : | 


|account file is empty 


|Task select. |Indicates work-to-do. 


|for VSE/POWER 

|Work space is avail. 
|Virtual storage avail. 
ere space is avail. 
|Indicates that IPWS$I7 
|has sent information 
Ito IPWS$$CM 

|If work is to do for 
|PNET Driver 


|work-to-do for line 
|manager. 


[to SNA terminal which 
|was previously 
|suspended is to 

| continue. 

|Indicates that IPWSSSN 
|must attach IPWSSIB 
|Indicates work-to-do 
|for IPWSSSN 


|Indicates that service 
|request is processed 
|Indicates that service 


|request is waiting to 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
|Indicates that trans. | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
be processed. | 


In that case 


the address of the entry is contained in the task class list (ECB list) in 


the TCB. 


When the ECBs in the RDR, LST, or PUN class are posted (by 


IPWSSAQ), they indicate that an active entry exists in the class chain 
represented by this class table entry. 


Appendix B. 


These ECBs are unposted by IPWSSNQ. 
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APPENDIX C. VSE/POWER STATUS REPORT 


This report is printed on two occasions: 


1. When VSE/POWER is initiated, when SYSLST is assigned to a line printer 
in the VSE/POWER partition. 


2. When VSE/POWER is terminated with a PEND command that includes a phys- 
ical address of a line printer. | 


The format for C-K-D devices is shown below. The format for FBA devices is 
similar but definitions shown below for tracks are for FBA blocks. 


QUEUE FILE IJQFILE 


TOTAL NUMBER OF QUEUE RECORDS Xxxx RECORDS 
NUMBER OF FREE QUEUE RECORDS Xxxx RECORDS 
MAXIMUM NUMBER OF QUEUE RECORDS USED IN PRESENT SESSION Xxxx RECORDS 


DATA FILE IJDFILE 


TOTAL NUMBER OF TRACKS xxxx TRACKS 
TRACK GROUP SIZE xx TRACKS 
DATA BLOCK SIZE xx BYTES 


ACCOUNT FILE IJAFILE 


TOTAL NUMBER OF TRACKS xxxx TRACKS 
PERCENTAGE OF FILE THAT IS FILLED XX % 
FIXABLE STORAGE ALLOCATED TO VSE/POWER PARTITION xx PAGES 
NUMBER OF TIMES TASKS WERE WAITING FOR PFIXED STORAGE xxx TIMES 
MAXIMUM NUMBER OF PAGES FIXED xx PAGES 
MAXIMUM NUMBER OF TASKS ACTIVE AT ONE POINT IN TIME xx TASKS 
NUMBER OF TIMES TASKS WERE WAITING FOR VIRTUAL STORAGE xxx TIMES 
TIME INTERVALS FOR SHARED SPOOLING (SYSID=n) : 

Tl = x SECONDS, T2 = x SECONDS, T3 = x SECONDS, T4 = x SECONDS 
NUMBER OF NOTIFY MESSAGES LOST: xxxxx MESSAGE (S) 


Figure C-1. Status Report 
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a user on another node, to the central operator, or to an ICCF user. &P The 
format of the macro is as follows: 


&name IPWSNTY MSG=(Rx) 
=$mmmmm 

NODE=(Ry ) 

USER=(Rz) 


MSG Rx contains the message id index 
Smmmmm is the actual message number as obtained from the mes- 
sage definition module prefixed with $. 


NODE Ry contains the address of an eight byte field containing the 
target node name. If not specified the local node is assumed 
to be the required destination. 


USER Rz contains the address of an eight byte field containing the 
target userid, either a remote id in the form 'Rnnn' or an 
ICCF userid. 


If not specified, the message is routed to the local console 
of the specified node. 


IPW$RLV - Release Virtual Storage 


This macro is used to release storage acquired with the IPWSRSV macro. The 
storage is returned to the appropriate pool and is available for other 
tasks. All tasks waiting for storage will again be posted in an attempt to 
satisfy the requirements. 


The format of the macro is as follows: 


&name IPWSRLV <ADDR=(Rx)> 
<,ALL> 
<, OWNER=(Ry)> 
<, ANCHOR=(Rz)> 


ADDR is the register which holds the address of the work space that 
should be released. The length of the buffer is found from the 
buffer prefix. It is not required if ALL is specified. 


ALL means that all storage belonging to this task should be 
released. 
OWNER specifies the address in Ry of the TCB that is to be used as 


owner for this storage. If not specified the issuing task will 

be considered as owner. The ‘head' pointer will be taken from 

the owners TCB. Must NOT be specified if ANCHOR is specified. 
ANCHOR will be used as the ‘head' pointer for the chain. 


Upon return RO, R1, R2, and R3 are destroyed. 


Appendix D. Format of Internal Macros D-7 


Licensed Material - Property of IBM 


APPENDIX D. 


FORMAT OF INTERNAL MACROS 


IPW$BUF - PNET Buffer Management 


This macro is used as linkage to the buffer service routine (IPWSSBS). 


The IPWSBUF macro has the following format: 


&name 


REG 


WAIT 


CNTRL 
FREE 
GET 
HEADQ 


IPWSBUF TYPE=MSG 


QUEUE 
PURNR 
PURNT 
RELEASE 
, MODE=IN 
OUT 
<,REG=(R1)> 
<,WAIT=NO> 
=YES 


is optional but if specified means that the address of the 
buffer that is to be referenced is already loaded into Rl and 
the address in the NCB should not be used. If not specified 
then the address from the NCB will be used. This keyword is 
only valid for TYPE=QUEUE ,MODE=OUT. 


YES specifies that the task wants to be placed in the wait 
state until a buffer is available. 

NO means that control will be returned directly to the calling 
task, with or without a buffer being available. 

YES is default. 


Register usage is as follows: 


RO 


function code, describing the type of function to be 
performed. 


01 - GET - MODE=IN 
02 - RELEASE - MODE=IN 
03 - FREE - MODE=IN 
04 - QUEUE - MODE=IN 
05.= GET - MODE=OUT 
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the ‘received queue' is empty and on entry register 1 contained zero, 
then a return is made to the user with register 1 containing zero to 
indicate that no buffer was available. If the ‘received queue’ was emp- 
ty and register 1 was NOT zero, then the task is put into a wait for a 
BSC event. 


Note: This function is only invoked by the Receiver. 


3. QUEUE 
causes the input buffer being received, addressed by R1, to be queued as 
last entry in the ‘received input chain' for the task, checks the number 
of buffers in the queue against the maximum value specified in the 
MAXBUF parameter for the node, and if the maximum is reached set a sus- 
pend for this task. 
Note: This function is invoked only by the line driver when an input 
buffer is received successfully. 

4. RELEASE 
causes all buffers up to the maximum specified by MAXBUF, to be freed 
from the 'free input chain' and to be returned to VSE/POWER storage 
pool. If the number of buffers in the ‘free input chain’ is less than 
MAXBUF then all are freed except for one. 
Note: This function is only invoked by the Line Driver. 

MODE=OUT 

1. CNTRL 
causes a small TP buffer used for a NJE control record to be reserved 
and its address to be placed in R1. The buffer is marked to be freed 
after successful transmission. If register 1 contains zero on entry and 
no space is available then return is made to the user with register 1 as 
zero. If register 1 contains non zero on entry then the task is put into 
wait until space becomes available. 

2. FREE 


causes the output buffer currently being sent, addressed by register 1, 
to be queued as first entry in the ‘free output chain' of the related 
NCB task entry. 


If one of the following conditions arises then the buffer is released 
and its storage returned to the VSE/POWER storage pool. 


. If the 'release-after-sent' flag is set in the buffer header. 
If the buffer owner is the line driver. 
$ SIGNOFF is in process or a line error has occurred. 
If the 'short-on-buffer' condition is set in the NCB task entry (NCBEST2 
= NCBESOB) then the task must also be posted. 
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Register 1 is zero, then ALL buffers are removed from the queue. 
e Register 1 non zero then only buffers belonging to this task are 
removed from the queue. 
If the buffer has the 'release-after-sent' flag set then the buffer is 
returned to the VSE/POWER storage pool. All other buffers aré:. queued 
into the 'free output queue’. 


QUEUE 
causes the TP-output buffer, addressed by register 1, to be queued as 
the last entry in the 'to-be-sent chain'. If the buffer just queued is 


the first in the queue, then the line driver is posted. 


If a line error has been detected or a 'SIGNOFF' record has been 
received, then the buffer is added to the ‘free output queue’. 


RELEASE 


causes all TP-buffers in the ‘free output chain' (anchored to this NCB 
task entry ), to be released and returned to the VSE/POWER storage pool. 


IPW$GMS - General Message Service 


The 
all 
The 


The 


macro IPWSGMS must be used to invoke the general service function for 
messages and commands that should be routed to the correct nodeid/user. 
command/message must be in NMR format. 


format of the macro is as follows: 


&name IPWSGMS TYPE=DIST,NMR=(Rx) 


TYPE 


NMR 


TYPE 


The 


RO 


Rl 


R4 


R5 


TYPE=SUB 


DIST causes the link to the general message distribution ser- 
vice. 


Rx is the address of the nodal message record that must be 
distributed. 


SUB causes a link to the general message service routine to do 
message substitution. 


register usage for TYPE=SUB is as follows: 
message length - 1. 
address of message. 
address of message control table. 


TCB address to be used for message modification. 
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R2 destroyed 
R3 destroyed 
R4 destroyed if OWNER or ANCHOR was specified. 


Note: Even if WAIT=YES was specified, Rl must be checked to see if storage 
became available. It may happen that the task is posted again because of 
some abnormal condition, or a termination condition, and will then return 
without having acquired the storage. 


IPW$STM - Set Timer Interval 
The format of the IPWSSTM macro is as follows: 


IPWSSTM TIME=ttt 

(Ry) 
<,ECB=(Rx)> 
<,TQE=(R1)> 
<,WAIT=YES> 

NO 


‘There is also a second format that can be used: 
IPWSSTM CANCEL=YES , TQE=(R1) 
ECB is the ECB which is posted when the time interval expires. 


TIME ttt is the time interval in tenths of a second. The time may 
be specified as register notation (Ry). 


TQE addresses a previously acquired TQE. If TQE= is not specified 
storage for the TQE is reserved and register 1 is used as 
pointer register. 


WAIT YES means that the macro expands into a wait and the TQE stor- 
age is automatically released. 
NO means that no wait is automatically generated 
YES is default. 
CANCEL YES can be used to delete a time interval which has been 
already setup. TQE= must also be specified and R1 must contain 
the address of the TQE that should be deleted 


Note: Upon return registers RO, R1, R2 and R3 are destroyed. 


IPW$UNV - Unchain Virtual Storage Element 


This macro is used to unchain a specific element of a specified queue and to 
chain it to another queue. The address of the unchained element is returned 
in register 1. The element may be directly addressed or if no address is 
given then the first element of the queue is unchained. 
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LIST OF ABBREVIATIONS 


AARA 
ACB 
ACB 
AQ 
AQRA 
ASAB 
BCA 
BCW 
CAT 
CB 
CCB 
CI 
CIB 
CIDF 
CP 
CPB 
DLRSA 
DMB 
DQ 
DSHR 
DRW 
EAR 
ECB 
ER 
ETX 
FBA 
FCB 
FCS 
FQ 
GD 
GNB 
IB 
IC 
IR 
INIT/TERM 
IP 
JECL 
JHR 
JTR 
LCB 
LDA 
LF 
LK 
LL 
LMF 
LMGR 
LN 
LP 


Auxiliary account record area 
Account control block 

Access method control block 
Add to queue 

Auxiliary queue record area 
Asynchronous service anchor block 
Buffer control area 

Buffer control word 

Control address table 

Control block 

Command control block 

Control interval for FBA 
Communicator information block 
CI description field 

Command processor 

Command processor control block 
Double linkage register save area 
Disk management block 

Delete from queue 

Data Set Header Record 

Disk request word 

Execution account record 
Event control block 

3540 Diskette reader 

End of text 

Fixed block architecture 
Forms control buffer 

Function Control Byte 

Free queue 

Get data record 

Generation table 

SNA inbound processor 

Pass command routine 

Internal reader 
Initiator/Terminator 
Initialization processor 

Job entry control language 
Job Header Record 

Job Trailer Record 

Line control block 

Logical data record area 

SNA logoff processor 

Lockword 

Logical list 

Line manager field 

Line manager 

SNA logon processor 

Logical punch 


List of Abbreviations 
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SA 
SAM 
SC 
SCB 
SDA 
SKAD 
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Save account 

Sequential access method 

Scan reader JECL statement 
Storage control block or String Control Byte 
Single data adapter 

Seek address 

Get SSL record 

Separator line area 

SLI work space 

Storage management service in nucleus 
SNA manager 

SNA control block 

Spool parameter list 

Spool management 

Service request block 

String Record Control Byte 
SNA unit control block 

Tape control block 

Task control block 

Task management field 

Task management service 

Task terminator 

Task register save area 

Task selection list 

Virtual storage control block 
Validation service in nucleus 
Virtual telecommunications access method 
SNA work space 

Wait control block 

Writer 

Scan execution JECL statement 
Execution reader 

Execution writer 
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GLOSSARY 


Following is a definition of some of the terminology used in this manual. 


Adjacent Node. Adjacent Nodes are any nodes which are directly connected 
with one another by a BSC connection or an SDLC session. 


Alternate Route. It is possible to define for any destination an alternate 
path that may be used in the case that the main path, defined by the ROUTE1 
parameter in the PNODE macro, is not available. This second route is called 
an alternate route. It may be specified by the ROUTE2 parameter in the 
PNODE generation when defining the destination node. It does not need to be 
a path using the same line discipline. It is NOT used as a ‘load levelling' 
mechanism. 


Command Switching. Command switching is the transmission of a command 
which has been received from the network to the next destination on its way 
to its final destination. 


Compression. Compressing a data stream replaces two or more consecutive 
blanks by a one byte control character containing information as to how many 
blanks have been compressed. If three or more consecutive like non-blank 
characters are found then they are replaced by two bytes, the first control 
byte containing information as to how many occurences of the character have 
been compressed, and the second byte containing the actual character. 


Compression is very widely used to reduce the size of the data stream before 
transmitting it via a tele-processing system. 


Decompression. Decompression takes a compressed data string and expands it 
again to its original size by replacing the compression control bytes by the 
specified number of characters or blanks. 


Direct Link. A Direct Link is defined as a connection between two adjacent . 
nodes which is physically accomplished by a BSC line between the two nodes. 


End Node. The End Node refers to that node which is designated as the 
final destination for the job or output. This can be the Local Node or any 
other node that is reachable within the network. 


Execution Node. The execution node is the end node for job's. It is that 
node on which the job will be executed. It may be another VSE/POWER node or 
any other node supporting the networking protocol used by VSE/POWER PNET, 
and reachable from the local node. 


Final Destination. Same as End Node. 
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